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ABSTRACT: 

The recent attainment and continuing development of 
personally accessible computer facilities have opened 
another chapter in the use of machines by man. A number 
of current research efforts, including Project MAC at 
M.I.T. , are designing new conceptual systems to adapt 
the emerging technology to a wide range of human activity. 
Activities relating to management are the concern of a 
trial system at Project MAC called OPS-1. The OPS-1 
system and the experiment that launched it are described 
in this manual. 



"Work reported herein was supported (in part) 
by Project MAC, an M.I.T. research program 
sponsored by the Advanced Research Projects 
Agency, Department of Defense, under Office of 
Naval Research Contract Number Nonr- 4102(01). 
Reproduction in whole or in part is permitted for 
any purpose of the United States Government." 



This empty page was substituted for a 
blank page in the original document. 



• iPf. 5/15/64 



PRBBACB 



OPS-1 is a trial on-line system for genera lTpurpose use of a compa- 
tible time-sharing operation, such as M.I.T.'s CTSS [8}. It is the 
product of an experiment which I conducted during the Spring of 1964 with 
a graduate research seminar (15.599) at the M.I.f. Sloan School of Management. 

There were eleven students in the seminary* Several of the students 
had no prior experience with CTSS, yet they were using it successfully 
within the first week of the term. 

At the initial meeting of the seminar, we r«view©d recent progress in 
the development of personally accessible comgut#r systems, of -which CTSS 
is an e;arly form. We discussed the outlook fosc management , including 
applications to simulation methodology, data analysis, decision making, 
and the design of on-line systems [1, 3-7, 9-12J. Our theme was: much 
can be done; present technology is already more than adequate^ there is a 
common thread running through many of the possibilities; the greatest 
need is for basic thinking and a simple, flexible approach; let' s get 
started on a framework that will adapt and take form as it is applied. 

During the second meeting of the seminar, I sketched in broad outline 
what later developed into the OPS-1 system. Previous use of a very pre- 
liminary implementation of the system led me to believe that the OPS con- 
cept had potential application to a variety of management functions. The 
OPS approach appeared to provide great power and versatility, while 
requiring minimal systems programming effort and almost no arbitrary con- 
ventions. From the pedagogical point of view, it offered the student a 
ready opportunity to be driginal and s^lf-expWiisive, and gave him a little 
guidance to help him oh his way. 

The experimental plan was to have the seminar group program a 
generally acceptable version of the OPS system as a common project during 
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the first part of the semester, and ,",*&«&; spend the remainder of the term 
applying it to individual projects. We did not expect by this plan to 
produce any revolutions in management systems or concepts; but we did hope 
to' uncover some central M issues anct achieve some basic understanding: a 
hope that was not in vain. 

|he experiment proceeded asfol.lows, -,A^ Q%fa^£?!$&WvyP--)ftf ! &'?:--i-:i 
grounds to a common level, students with little GTSS experience were 
paired with students more familiar with the time- sharing system. Each 
team was "assigned to program one or two general -purpose operators or OPS 
subroutines (described in Chapter III), using "either the FAP "or FORTRAN 
- language ;i A n«t«ad«cd ptfdceder* mmi HSita^Mifted-fe* *ol ;Meeftig s attd 'conso- 
lidating i»f ormatioa m ^-(pfa*W<^'|te*P L 1^*iiintt^^'# 
dure, iajsed origfio«^lyn<Mi' Ch* MMO'^CieiiaMidt^f ^Clttfp Sid stllwNlqu^nlrly «o ? 
the present manual. ,•:;".-; .in .• ,-. ; ; , va^i -ho;i::i:j,>; ^ox 3 ;. J : m-', o:; £;! ; ''"-' 5 - 1 '-" 1 - 

Some students came to the seminar meet ihg ; the week after the assignments 
were made with completed programs. Most came, instead, with questions and 
suggeltiohs t ^fewwoulfd the system do such and suchf*, ^Would it not be 
better to do it tliis Mother way7 ,r , arid so on. 

One possibility would have been to encourage questioning and dissent 
at this Stage, "with the risk of the seminar *% "spending the better part of 

■-v, ....... : . . . ;, r). > ' V -"•*' ■.<■ -"V8 '"-£'30 -'* ,' i j ' Vl H > 5 9 '-j O I 9 V » fa 'I O '? ' - i Jk-^ 

the semester ehta'rigled in endless considerations of system design. Another 

- 4 -,,--j -' ^ i -..'-' ■..■■?■! -j v's ■''"•-'•■ J :■ < r <-~ ; i. --i ? ii.i"; ;./.'-! 3iiJ io noi-i£^«fiar:i9lq!".i vi=£ im^i 
alternative, the one we chose, was to nave a subgroup of the seminar* go 

•.'■ ,.->-..,,.,'- f.,.,-.-....,r--;; f r. : , : , . • ■•-'• -rv v on fl"? t rlioxl aqiS 1 « t JiTSJ .: ; .'i b!.,.? : r >3 

into intensive' deliberations, taking full account of points made in the 



seminar" meetings, and emerge with final specifications for a first-phase 

system. ' 

What steered us to^ , the. ; ^econd alter ; na!tj^e, w^s J^e^-belji^, f^t many.., , 
questions of systems design, such as the neqd, £pr.f lf^t^jSt^v^uring^.^pUjld. 
be better posed and answered a posteriori , or after having had some 
operating experience, than a priori and in vacuo . We felt that adoption 
of a straightforward DPS- 1' would be in the spirit of the seminar, and could, 
as a by-product, provide guidelines for subsequent cjoaifitructioja of a more 



i.'i?;i 



*Gr eenberger , Jones , Klein , and Ness, .»,- , -, 
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sophisticated system. Simplicity and expediency were our watchwords for 
the time being. 

The specifications that resulted from the meetings of the subgroup 
found surprising acceptance from the rest of the seminar the following 
week. Miraculously, the main objections that had been raised were all 
resolved by the modified system, and certain new features appeared as 
unexpected bonuses. 

The OPS-1 system was programmed within the next two weeks to a state 
which allowed the individual projects to get underway. Except for some 
minor improvements, made later, the system was then (March 18) as it is 
now and as it is described in Chapters I, II, and III of this manual. 

Chapter 1 defines OPS-1 and specifies its central components. Chapter 
II explains how to use and extend the system. Chapter III sets down the 
standard operators that were programmed by the students during the first 
weeks of the semester. 

Later chapters present some of the individual projects. In Chapter 
IV, David Ness gives an extension of OPS-1 that incorporates several CTSS 
supervisory commands, and thus provides the facility for the OPS system to 
modify itself and its storage map. 

In Chapter V, James Linderman extends OPS-1 in the opposite direction 
to obtain a first approximation to a "live" on-line programming facility. 
He calls his system OPTRAN. 

In Chapter VI, Robert Welsh details an adaptation of OPS-1 to provide 
an on-line simulation capability which he refers to as OPSIM. 

Additional chapters report on applications to management areas, inclu- 
ding an automated stock exchange, an on-line project scheduler, a national 
credit exchange, a mechanized system for accounting and budgeting, an on- 
line statistical processor, and a simulation of activities on the floor of 
a savings bank. 

The manual concludes vith some discussion of how the OPS system might 
be improved, together with a description of some specific modifications that 
have already been programmed and tested. 

Martin Greenberger 
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Note 

In order to keep this manual down to manageable size, reports on the 
following student projects have not been included. 

1. A National Credit Exchange, by Malcolm Jones 

2. Model Building, by George Klein 

3. TELSIM--The Simulation of a Banking Floor Using OPS, by 
Richard Mezger 

4. Modifications to the OPS System, by Daniel Thornhill 

The omission of these chapters does not reflect on their quality in 
any way. 

Also omitted from all chapters are program listings and detailed 
operational descriptions. 
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System Concepts 



in setting out to design the on-line system, we were influenced by 

■ ; . sj-'-Tf -.:■■■!=,■' xnl .■-.-,; .;•:,:< ,. r ;q-. .-: xti ~la ■ ^ns>m^-:iu-;rx:i ji-' .i -:■■_> - ■ • ~ ?.-:*&'. x>x.-.' 
certain basic concepts that seemed important to us at the time. Specif i- 

, ?gs jC!" xk'.i nl lavlsji'' .-. :■ : : : ". '."!'.<'■■ 

cally, OPS-1 has the following features. " Our experience with OPS-1 has 

reaffirmed for us the importance of these iM£MkJi^2&^^J&i'Te^^Mhit.':ii3£: : 

them : as essential . to £h,e jfuccess^qf gnv jf ^im^l||5jDn ? t^^ne,,j|yst#»io- , ; 

Simplicity . \ ■■■ ' ^'.xunx - -" ' •." ■:.;;■ ;-j.-. ■■■■•■:-. :i'c 

The system is simple to use and simple to understand, even by the 
relatively uninitiated, "Complications can extract a high price from system 
resiliency, and they were avoided wherever possible. The user may add 
his own complexity as the needs of his application require, but i^kaxMyxx'X 
thi^s, will not qom^ and 

ifc will not .reduce QyerMJ, f^e^^ty* Cr ; ,. } ,^ . _.,..,,.,.. 

Versatility .■■<■". ■'.•.,-.••:;':•- t»i ! ; i:- ,.;■■■-■■..] 

Unnecessary rules, conventions, and formats also were avoided. Thus 
the user is not forced into thinking about his problem l^ia^ificJttlitti.':™. 
unnatural terras, i|e h^ amp ( l«| r.o^m tft e^xprj^SjS, l^a. p^pb^em apd himse^, 
and he has the freedom to be creative* 

General isfcy x' -■■'/■. ■}?,:• i 

A wide range of applications ia' possible, from the structuring of 
simulation models, decision procedures, problem solvers," and information 
processes, to the design of programming systems and oikzliA^JipexStii^d&^'xyx. 
including CTSS itself ^ ThLs generality i,s par^u^lajcly aJLgn^f^ant in 
that ^.t facilitates the ^cqnstruc.tipft P^^^^ r ^'S^tf^^ i ^-f^^ ■9J» bi . n f ;-f w P;.-:. 
or more kinds of elements; for example, a real-time traffic, controller ., ; 
with simulation elements and data analyzers; an on-line programming system 
with debugging aides and an instant-execution feature; a }bb^s4iop 
= deci*ijQ« sjrstfflm wfcfiic sitaulaticai!;' infbnfcWsixWJ ptfc*c«»*i*ig j ; Wtiff prbtea!<*m 



^.:*.i.--t"i,.,.~. .-.■ „,-^.:-t^- ■„-...„. . ■ .■.--_■-.- • v.,>,^ -.-^V ~^>":'%^~^^^^ -^*^-"o«3!fei ■ 
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solving elements; or an informati&i-utillty'with all of these elements. 
It is a safe wager that man-machine organizations of the future will be 
large hybrid systems of this general character. 

Individuality 

In customary use, the system is expanded by the user to a form that 
matches the specific requirements of his application. The basic system 
performs like a catalyst in this process. 

Expandability and X>R*a-Eii4ed*»«a,s (i 

Typicallyv the ixpansion of the iystem f*°iif small ^increments which 
extend its usefulness, but not its structural complexity. There /iijfoo^j. - 
theoretical limit to how far the system can be expanded without its .. 
getting bogged down. Expansion may be gradual and continual over an 
indefinite period of time. 

Modularity ;• , --. "-,, :-■:■■<•. -:i.J a:~ ^:-/--<-, 

- The elements 6f the system are like pttiggatbfe 'piiii't Except for the 
few main components, each part can b4 r 1 tiap t fdg^y vtffiMt disrupting or 
affecting any other part. Most of the elements are called operajBOTS. ;-_ 
They do not call on one another directly, thus ensuring separation of function. 

Immediate, Execution r r-,.; -j.;, .:-• : - ; :i:ay.^ •■■3-::i ha^ic:; -: 1 '■' 

An operator can b6 executed as it ii refir^nceTdr. rais feature 
facilitates the editing, probing, and ; te8irfiigf at s^i^Wl^ i^odef* and 
information procedures while they are under construction. With ^hujbuikg,'^, 
of system operators, a model or procedure can be working almost as soon 
as it has a meaningful structure, and well before it is in .final form., 

Conditional jfecatUng ■■>•<.=-•> .io .i:..i.«-»: 

As elements of the system are relfereiSced add" examined in compound 
patterns, the patterns aWautom^^ addi- 

tion to- the system. "' ' Uj t ' ; ' i '''"""' ''" '" 

Graduated Guidance ■ , , . -,. 

i ' EeJ^f^ hftodholjai««n 4« ,|&££*fi*db tb* u,sar hyi ; teh» computer «e- first , • but 
this guidance can be abbreviated as the user becomes more adept and sure-footed. 
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SYSTEM DEFUTITION 



- n'ox.'.ife'mr,' 



The Str^Ci«r< »f WW-1 ■' ->- ''■■- ■'«-^ 

The system wis a basic structure that is easy to visualize. First, 



EUvD.lf'J'JG 



ill TO 



ST^B 



there is a common body of information, called the data base , that occupies 
one «*cti©ti of compete* *ft«M:yr the*- th*W M&* *«t of sIA»l<> operato rs 
that tang* ove* th* ' d**a' **«* (tl>i*Y *t* i ubfe atel iua* IfkiW^i^t* written 

language) ; and finally 1 tl^e^mMaifc^rtl-i&chaM^ 

to eftefe**«'''ani <e^oiHiunio>fctttt^ltef>l«^ef>e^lo»s'' ) <tn ft**A»l« c*y«4nittdni , » : 

•■ / si , . . . /■ :rc< noi. J^'TClm n» "iul bns ;mpJ3;{8 -3.'!: •"•• :----s..' " --.'-'•;■ ': "■''-' 
The structure of the system is shown schematically in the diagram 

t3nluai,;Sjsi 'jfrfc fay "vl sns &tjisd al jia: ;-sJi.r- "i ■ ■•i;ax' ..:-i 
components of the system will be described briefly 

now, and in *«m* ItetAlli in* lfttftf pi§«s%iJ: 



3n.*> 



SCTJ" 
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DATA BASE 
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Data Base 

The data base is the information center of the OPS system. It 
contains information of joint relevance to any two or-Wg e^#e yajr»fee-^ .la^iT 
elements of the system. Its data may be arranged as single numbers,.. 

multi-dimensional arrays, or list structures. 

- « 

^Thf first? pjart of the data base i* a«soc'i*t*d w4.f*qi$h* teajterfy***!*^ 
itself. The remainder 4#- added by the uaer; a«$^dii»5t^<$h«^n*ed#rtof his 
application. -. It beconwm a KHfMVfl^Umsssiothtc, i*&wtmtim*U c?nt»j*£; o*n 
environment of his problem. f«rj • ? «4i»ulatieTh medal, if Sitfi a ,tertt«y§i «€i 

the processobfcing modeled; |.9^a, : ^ea4 ? |:lapq.«f«rfAio8ttu44rr4.# SrrfeaMEdfiof ;J 
the present state of the system; and for an information processor, it is 
the bank of data that is being analyzed and manipulated. 

At the present time, the entire, data b*#«i i#j located wUSM$icmma^^,n 
storage in the primary memory of the computer. A map of the data base 
is associated with each operator, as well as with GGtflf&P, a service 
routine for operators. This provides the operators with the means for 
finding, moving, and modifying values within the data base. 

Conceptually, there is no reason why the data base should not extend 
into the secondary memory of the oomputer. ?^his can be done with tjie 
present ^ES-lf system by the user's formulating and introducing the 
appropriate operators. An ideal system wpuLd make this extension automa- 
tically, without requiring Sty action r ^ ^^ejMr'W the user. The iiata 



base would then be open-ended, and there wojild be no\ theoretical liinit to 
its size. '-:.- y 'j''. % 

. - : ' • ,. ,..-■-■ 4v* 



^-"-y 
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Operators ■_-. ;;o .: ., . ...—„:.j;';i': .. 

Operators ar* the functional »ubr<mti(R*B of the *tf& aya/tem. A set 
of standard oawratwa comae »i£h;j3he ayataiav ajirfsiprOTidaw ( feh* general - 
purpoaa -aesiricsea itttjuirfsid by»mDa£ *8*r»i n^Qtc^iaifcaialms^tapavaCora ax*'. ■ 
described 4ait ^hfeptlsr: liCi:. ^ r b s,-u .■-'• nwciU! at sib;:;in.^ -.^L,'.'. 

A user builds up" the 'iW system^' flt c hls J |kr1:icular needs by ' 
. enlarging the ""set of stana h lr'd r op'eracdrV. ""*' ¥nafc Ita'; %fe' programs and com- 
piles his own operators, using 5 : i" language 1 •lESFaa' WRtRAK or PAP, Intro- 
duces them to the system, and makes corresponding additions to the data 
base. Tha precise procedure t\e, Ifp^iaws u i|i ''faking^ th^se step%,ls spelled 
out in Chapter Il»,.„.„, „„„.,. .„,„. 



SO UUJ 



Associated with each 'operator s]re^ iufigfkrj o£ pannefters -Uhat give it 
specificity. T%e user, id the simple mode of operation, enters these 
parameters from ^his n console at the request of the computefr. '-tk making 
its request, the computer assists t!je uaer by p^int^tng guide lines ' 
indicating the *«tssslia««4 formats of j the parameters. 



>m 



The operat^tf^Jliken together wfith thasdata base|sgijve the OKI syseei 
a state-transition appearance. iChe Idata base represents jthe state bf 
,l£he fcystem, and the operators, operating on the data. base, cause transi- 
tlotfirTo new states. In tshis analogy, the compaund operator is a schedule 

of future transitions with a fixed |&i1?l:IrirttlK!ng^ 

i ' I t I I , .- t | 

durifg the lifetime of the* system. ! ■ 

OPS-1 stores all simple operators in primary memory,> ^and keeps one 
compoufid operator there at j a t ime . It holds the rest of the compound 
operators in secondary memory, and brings them in as needed. A preliminary 
improvement of OPS-1 also brings in the simple operators as needed. 
Ideally, compound operators could be used to schedule the dynamic allocation 
of simple operators by helping to anticipate when they will be required. 
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Compounding Operators 



±i :■ -^ ' : \J 



Simple operators may be strung together fc© form a co mp oun d- operator , 
or KOP,- ami the KOP may be *a»lgned an iden^iflc^t^e« n\ada«XB«s4 rc^adjoeA : 
in list form as a permanent addition to the a y at e a u Thto'X&P i^Jrepr*s*at<edu 
by an Mx3 array (with structure as shown in the diagram beiow^; plus *»©i s :■?, -.■> 
linear arrays for the associated paran»ter8, Thejie arrays are stored as 
part of the data base, and may therefore be modified by operators. That 
is, the operators can modify themselves and the KOP's. 
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Modes of Operatioo 

The WB*>1 system 1b operated by tthe user from Ms : ci«r*atev At; any 
given ti»e, he may, by hi*sow^oc*iny, operate fi» We of six possible" 
modes. The mode* are as follovet w - r,,r - >v! ' 



!• Simple eyecutiqn ; 



Create with execute » 



3, 
4, 



5. 



Create, yjthpufc execute* 



Compound execution 
with parameter entry : 




with- 



9 » Blind create t 



execution of a simple operator (i.e., of 

*»),■' •-■•■■■' & •"••-'■ ■•■■■•-- •'? 



creation of a compound operator by 
r aadi*|tf iw - ; (jrwWH* list, " l The 1 

OF is executed and guide line* are 
printed, 

sapRaa 2* but without execution of 
the OP, 



execution of one or more OP's of a 
;gfi£cl&tfc> iJtecfeslBP request* entry of 
its parameters from tha tsm B ole by 
printing guide lines, and stores 
*fep*fb iittJ*j**tJUr*£ itfc«a« appropriate 
jLcsftti*n*:; of *he parameter 1 1st s . A 
carriage return at the console 
(9i1fa<mb'$hm>mtm¥ .^o&maty parameters) 
causes the, paa-jiimters preriouBly 
stored in the lists to be used by the OP. 



time a s 4 , but wi £h each OP automat ica 1 ly 
using parameters already stored a* '■'-■■ 
the parameter lists. 

/isame a* 3, but; without guide lines. : 
The u»er is responsible lor knowing 

:. the nu*6er and f o**mt of ch* parameters 
of all Op»s in the KOP he, is : cheating. 



Sfc*^^^^^^^^^.;,^^"^*^^, 
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An Example y.-.i-.r^ 

T 9k il ^l^ a ^ e ^ itt 1 ? aes . *y*Pm&%s^^&m* iw* wnasmmt- con- 
text ^, 1 ^ u * consider an ov^impl^g^^efcaf^ r£ox_ s 

the last twelve months have been collect^^y^ ; £ur#e&<pv^ ,£© Hal, a^^nesfe 
employee in the marketing department. Mai has been requested to develop 
a technique for forecasting future sales. He decl^eT*ro~tryThe exponen- 
tial smoothing rule, F t+1 - aS fc + (l-a)F t> where F is the forecast of 

8«ie^.in i y^^t,;- : S^;;i^4:^.a4^iW orted sileTTDTwlselc ~ty F~, is" the 
forecast tob© generated Jor^ the «e^: week, and a is the smoothing con- 
stant. Mai wants to see if there is a smoothing constant that generates 
forecasts close to th* actual weekly Mtta^lZtfJ^tefar aftfrfr this 
problem in the framework of the OPS system, he recognizes the need for 

three basic operators: l" ; :;^J'--\,li^- r I£^Z!pIi 

; ■' ■ ■ ' ■ ''""■■■ ^ ;; - ; - ? ■""■' - '•''-- c ' ' _ '-"-C^i _ 

1. . An input operator that reads data into a specific area of the 

■;"'. data base. : ^^^- "-^ ;,:^ 

2. A general arith*M*i« operator that can add, subtract, or 
i multiply any of ?«harc*fci4tfbies in the data base. 

-r--, ^..o',:! print oper;ator th*to%iM> write out the value of any variable 
. in the. data base . ■" ;i 

Mai decides to determine whether the forecasts are good or bad as 

J^t sit ? ( at ;£ he c °nsole, and not to .. grogiinnc$IC$^ 
procedure, . 1 r- ): 

Mai could now write these three special operators, but he first 
S 1 *?^ 8 at the list of hlsi^ pP*s' : |iu Chapter III of ' t fel OPS^ i-aanua 1 and 
vnetesjjhat the M0ME3T0P ^OPi^rproso-ides both the input and print functions 
•that he desires. Glancing at Chapter V, he also notices that OPTRAN could 
be used to compute the forecasts. 

However, he wants to get some experience writing his own operator, so 
he decides to write a general arithmetic OP. This operator could be 
programmed in a number of ways, but he decides on the following approach. 

He defines several data registers X^ X 2 , X 3> X^ that can contain 

input variables, constants, intermediate results, or final results. The 
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OP will have four parameters, all l»iyaif i :;.-. The first parameter tells 
where to put the result, the second where to get the first operand, the 
third what the arithmetic operator is, and the fourth where to get the 
second operand, fftfs might be stated as X.' = X' X, where XV, X, 
and X, are data' registers, and is either addition, subtraction, multi- 
plication, of division, the corresponding parameter values are i, j, n, and k. 

' Mai programs Jhis OP in FORTRAN, compiles it t _adds ,it to ^Igg system 
as 0P21, ^nd checks^it out using mode 1, Now he starts to wr^fe«t r a 
compound j OP. He,, can do this in either mode 2 or 3t ..He^decidee ,^o use 
mode 2 so as to g^t an immediate check on the correctness of hia^ process. 
First, he writes fe-ur, 0P15's to read in the constant Jl, the constant a, 
the old forecast, F t> and the last week's sales, S . Then, he writes 
four 0P21's to calculate the forecast, F . Finally, he adds an 0P15 
to print out the result. 

S ^^f ie!d with ^8.9- line KOP. (seepage 1*17)., ,Mal .deQidea^ save 
it for ^saf.g keeping _pn a simulated tape. To dp this he exe.qu^a^OPn 
in mode l t , , Now heis ready to return to the first line of the f KGP and 
execute it rep,e4ted,ly in mode 4* using the new _values.Qf_F _andc$ • 

Af t#r repea^i^ this KOP a few times j Hal realizes -that §M® 
impr^eme^a .m4 psmlble; First; -he uses a-M8¥K-0P-(OPr6> tS #%lace 
the oBd f®ceca»t,.*|, with the new forecast; F.-r,- -at -the hot iSMf^of the 
KOP . He tshdri atfteF* branch OP to loop back to the "begltnitng <£# -£he KOP . 
To mtfkec these* chattgss he reverts to mode 3; After a ~f e* TfloTe ^eles 
through tEhjfea nmt K©Fy he realizes* that there ±s only one -OP(4M (i 0Pl5 
that reads-itf the actual sales # t > ttatt^eijaireff vne^TMrrameier' each time. 
Only this Q& nlsMids WHe 4. All the other OP »* 'have ~f t«Sd "parMltfers and 
can be efce^taAin W6&e 5. Mai therefore ~decidetf~c<5 rm in m&^e 5 and 
simpO^ use iw* MODIFY opV (OP15) to switch between wades 4 finl S at the 
appropriate times (see page 1.17). Now he can automatically cycle through 
the KOP several times for each trial value of the smoothing constant. New 
smoothing constants may be inserted using mode 1. 

This example could be extended to show how Mai might build up a more 
complex forecasting procedure with the help of the computer, but that would 
bring us beyond the purpose of the simple illustration that was intended. 



- V^^-s^^J^^l^^l^^Sits^*.-:^*^.^^^ '5*Jfc-7>-^s^v:^-^rii'i"T-. : '■;-" ^; ->. ^-^ . : :-"^ ^-^ - - ; ■ ~4*- ! *te»**K: vv* 4&~£r 
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a , Ji i Tlff i i i B SS- 



0P15 -------- --------------- rea£ couggK 1. .,. „ 

0P l5 --^-, Tr: ^-. .... Tr ...^.r^c^^a . f . 

0P15 ""-."- ----:"-----n r otftv!WIWI..K.- .. 

0P15 - *«*d l««t ##les S fc 

Wii — — ~ „ ! ;-~-- — --.-,-.,- Ji^^^^i^ ^Tr t - ' 

OP21 — — -ii-- : ----- '—---— -^jj«j_ IfoiptitJ 1 F^ r ' ' 

opi5 Lx.v<iJ^...-:....-..:.:^i i JA t :. : : i :' 3$? ^ *t+i ' ' 

Revise m 

TOPff *** -— *^--^-^---^--^.^ / &J ( i; L <^tai^ i a : "" r 

'$ft$ <*'— ---v ^.if^-_-_:^i.-_--.^^ ^r^ofe^rft: F fc 

Q(|$ ---:---- ;T -^ r »--<-*---.----.;- ?? »^-^.^*^*^-i ch«a»» to mode 14. 
QF15 : -*--»->T-«'f ! -'«*'**--?-^---,» — ,--• s*«s**«r---"^^'J3B«*4| la** aalas J ;:.., 
rQf^.-.rt-^:- i '- J '*'- — ----- 7 ~,-.-— -^pwi* -rhi-* ; ctuttigett £*nnod« J$--. 

,0P2l..,-*- :T ----.- T .-- r --/-.*-~-rr^-^^ F t^flf l ' H:: ' : 1: ' ! 

0P15 t,.,rr-"«-"« ?:---*,f-r--- >■ — .r-^tja^y^; ftu £-.'.. '. 

0P13 "---.-- T ---- — :Tr _ T ,^ ?Tff „ T ,-._-™ r ^^_.»^,.h m pj aK | > 5 feack .fcQ. QP14 



■" • X ' 



\ 



*#SgaS9s jiSJ^i^t-^^S^? 
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Central Mechanism 

The diagram of the OPS-1 system on page 1.10 indicates the role that 
the central mechanism plays in OPSr.l. It is the control center that 
switches the user to different parts of the system. The MA1NOP routine 
actually does the switching. 

At the beginning of each cycle, the user is connected to READOP and 
asked to issue instructions. If he 'ipe^tHei "mode^S^tie is connected to 
PARAMS with a direct line for enter ic^ pAra»et«*s io«o the IfR and DPR 
lists. No guide lines are. printed. 

In all.modes, the user is connected via CAJ^LOP .to the OP specified 
in his instructions. Except for modes 5 and 9, he can then communicate 
with that OP, or through that OP, with the data base. When the OP hw**'" 
completedi'iteafmjetiem it itekora* ca«li»«l c IWlaABAIJUIiitoiMa\IM<». 



In addition to connecting the ''user to W&£§, RfeAfiOT and PARAMS, the 

*.. ;**&&-- 'jJ/iOiJ/^ a a;-.,, zS . i^.,n sJiJOsxs ^Vbas sitsii a-l daiw -o ■ r.>-r~-= 
MAINOP routine creates or executes compound operators uCOP.?s,) and checks 

for errofs. 



COMMAP is a special table-look-up routine ^h§| 8 perm^fl v an OP -.to.. Tr .. : 

nicate with any specified part of the data base, 

•'■■''-' ..:>jdt.J ■:•• ;:u:5-!"i •"' <;i'-i "''[) 8io.1*f?^;o bo'iovx;'- .> ;.-;. , i. i :.- . : - "-.V; 

"^'.fimt ^W* 1 «Wi».r* r ?t«|»i«l^«rffiB;^«^l *$ ^f JpUowing PS£? 8 * 



^*^:^;- 3 ^^'^&tot| 
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MAINOP 

Purpose .-,-.■■•■. 

The program MAINOP MADTRN is the executive program for £he QPJ5 system. 
It has the following functions: 

1. Asks what operator you wish to execute nex^, s , t ., ,. , , 

2*. Executes the operator if in mode 1« ic'x yni :' n-oaii-. a .■'$}■.; :^"Ma' 

3. Creates a compound operator if you are ! in modes 2, 3, or 9. 

4. Executes a compound operator if you are in"m6<les'4 or S^ 1 

: .0 ■■':■■':. y J . .V; ■•■;:* .0 hiVf ,;' : 0:>O,H .jr;! Jo^uxii , EiK;f J'JiKrJ;- T i :: i ;i :;: 

Operation 

To do these fUncti<Ml»^ltAlHOPmak««u«* of 9the.th»««JsyBtem3 sub*; 
routines CALLQP, READQP. and PABAMS. It uses READOP to find out. what 

operator you wish to create and /or execute next . It uses CALLOP to trans- 

:-'•?•.■ '^ '■ '" ■■.•i ;,.--■ ' "U.-i; :• ':.>js-jflr!.-s bxjiM.qjnoa «;»3.U3»xo lo gsSfeSlo gii.) JJ!?-1 uUw ! Af 

fer control to the specified operator. The operator is specified by the 

* ?' I'"'li3 TO . 

system variable MOP. It uses PARAMS to read in parameters for an 
operator if ; the r modV ; is :i setrto; J 9." >i0 ' -•-■-"' ->-i ds:; Isl^s » -^ ■**&'■'- 

MAINOP creates compound operators (KOPs) by creating a table. There 
is one-line in the table°fijr ea^simpli^iriifcSr^^Ei^iini c^fciiiitT 
three pieces of information: (see page 1.13) 

1. The name of the simple operator--a two-digit integer. 

2. A pointer to the beginning of a list of integer parameters 
associated with the simple operator. 

3. A pointer to the beginning of a list of decimal parameters 
associated with the simple operator. 

To update the pointers, it makes use of- two system variables, JIPR 
and JDPR. These are the number of integer parameters and the number of 
decimal parameters used by the simple operator. 



■VT*-* -*"-• i ■ 
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At the present time, the OPS system does not accept a compound 
operator that contains more than 100 simple operator*. Also, this 
compound operator must not contain more than 200 decimal and 200 integer 
parameters. The OPS. checks to seeethat these limitf' ate nbi exceeded. 

When MAIN0P is executing a compound operator, it does not use 
READ0P, but instead gets the operator from the KOP table. It uses the 
system variable LK0P to specify what line of the KOP £ able is to be 
executed next. If OP9 is~ in mode 4, ~*tt.TNOP will stop at every line ot 
simple operator and ask for parameter values. If no parameters are typed 
in, the valaep-^frNt^n, tfeBv parameter lists (JM^jm^J^S^ *£}$$£ used. 
However, it OPS^liiA mode 5 j there is an autd^iicfiatuifi that; aJLlows 
MAIN0P to skip the reading, of parameters and i»a#ead-4N^e~ -the values that 
are stored in the tw0 parameter lists (IPR and DPR) *, The two System 
variabiles LIPR and LDPR poiBt4:o the fir at integei^, par aiMtjer and first 
decimal parameter, respectively, associated with the ai-mple operator 
specified by LK0P. 

In modes 4 and 5 it is posaibla to a utom a t ically sequence through 
several operators by setting the system variable JKOB- equal to the nufnber 
of operators you wish to exacute.,automaticallyfr* ^^^^^s^s^fc ,fq 99f, 

the automatic. sequence w^ij continue indef :'in^^y^:im:;]a^i.l:Ot:%^f the 
terminate OP, is encountered. „„„.,:. 



^.y.^t^^^f^Ssi^ 
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LKOP - 1 
LIPR - 1 
LDPR * 1 



I 



MODE - 1 
IfiPR * ; 6 
JDPJL - Or 



■t\ 




'1 ( '.■ / j: ... ~t '" 



40DE? N. ^j^" 

.; ?7v: L ^ -':-i iAH ' : -'- ^liUlii ,,L A J O'j 



KOP(LKOP,3) - LDPR 

> ) "J f l it ' |j>. !) ' il ftiiiMPIJ ' 



L?Pib»nl»f (JJtQTii) & 

LDPR - ROP(LKOP,3) 

Tft infi-fn^ffi fit Hi flH 




^ HSL^T JKOP 1 ?> Yeg 



JKOP - JKOP-1 



>4i". -• 



A 



A 



■7^ 
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JWOP 



Purpose 

The function of READOF is* to allow "tW user to specify what actidn 

he wi^es to ha*e occur next. '-■■-.• : ^ "••-■ ; .■■■■■j»<t.-- ■•re 

If MODE is 1, 2, or 3 READOP «fc« fell* «£ll«M3lgl 

1. Prints current mode (M0t»3 Itil llfti (M*P|i 

2. Prints a lint i« the fori* XX X fit, «he*l> 

XX » the Mtt if*eri*%i* ye% With ti~ elllir" If yo% irt'|M«g to" 
be in modes 1, 2, 3 (MOP)j or« the number of operators you 
•ifchato Mtimllieil^lt^fitiH^fe^is^^r rtieiorrfou 
agafn cof»e feack to^wanufl^gB^rili^w^OW*, < 

X = km mete? b6 §ut* f II 'cSitfeipfids 1 to" thl way ySti ' inienl " 
., the above, to jty^tuprilfe ,. h n£v ... a*,,^ -,.■ f.--$v- ■: .r ; .oi ; =■■ 

XX = the ltfti ftttt«erq«fi' w»iaS J f ofi 8181*1 §o ^ 

a. start execution in modes 4 or 5, 

b. insert an operator into a KOP in modes 2 or 3.** 

3. Reads in the operator number (or JKOP) , mode and line number. 

4. Echoes back numbers just read as a transmission check. 

5. If MODE # 0, sets mode to new number. 

6. If LKOP 4 0, sets new line number and also sets the new LIPR 
and LDPR pointers. 



*This jump (JKOP) can be used in both mode 4 and 5. In mode 4, 
you will be asked for parameters by each operator with no opportunity to 
change modes until all operators within this jump have been furnished 
parameters and executed. In mode 5, the stored parameters Are used and 
again you can not stop the sequence until jump has been completed. 

**If you set the line equal to something less than where you are 
presently, you will be writing over the old KOP, and hence, lose the rela- 
tion to anything below the number you set. 



^*t^fev*rta8steiS*ft*-**i. ,, *«- f~ - —C-~~-i- -S . 
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7. Sets MOP or JKOP depending on whether new mode Is 1, 2, 3, 9, 
or 4 and 5, respectively. 

8. Returns control to MA.INOP. 

If MODE is 4 or 5 READOP does the following: i{y . ,...,,.. 

1. Prints next operator in the KOP table, the modey and line number. 
The subsequent actions are the same as steps 2-8, previously d&gacibmi^' 
If mode is 9, REAJDOP ,, does the fjollflMisgtfoiiAM , J 3- 

1. Prints a line ofthei form; XXX I3fi*...\) --:: tm v 

2. Reads in next operator, .mode fnd line m/njf#rm*il 

The subsequent actions .are the saps as steps a-5<tS praariattaly described. 

If 'any qOhe three, fields; represented] ^ilX^XX a»e»fi*ft blank, 
or if a is typed, n© r <*hange^s made tb 5 fene^syitlft vifcianlls associated 
with those fields^ Thus^, their, preyiouf -vfjuffi-ar^usti^m Ibis feature 
is particularly useful in modes 4 and 5 *nen irt i^.^^ ^e^^«v|rt»% , ; 
a single carriage return provides, a eingU st;ep aporatigiu G ;J 



READOP 



(J) 
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ii^r. 



1^,3 



PRINT: MODE, LKOP 



-* 



V 



PRINT XX X XX 
READ: N, M, L 



MODE 




(^ 



J^'j- 3 ) 3 ) fr>f 



ECHO Print 



LKOP = L 
LIPR = KOP2 
LDPR = KOP3 



-i£ 



PRINT: NEXT OP, MODE, LKOP 




JKOP = N 



-i^Ki^X:»'^mMii^i^^s^i^^^^f!sw-'- 
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CALLOP 



Purpose 

The purpose of the CAIiLQP routine Is. tajtraasfer- control to the OP . 
that the user has specified in READOP, or to the next OP in the KOP list. 
CALLOP also handles error returns from OP's. 

Operation 

CALLOP operates as follows: when called the. first time, the routine 
immediately branches to TIME1. First the transfer to TIME1; is replaced 
so that this part of the process will be skipped in subsequent calls. 
Then we save the return to MA.IN0P and depress the console input level. 
Then the normal CALLOP is executed. ._...._ 

The normal CALLOP saves index register 1, then-sets up the sense 
indicator register so that EAP subroutines may defect MODE (if they want 
to) using the SI. Then we create a transfer .-to 0P-M*(MQ?).-wh4«b will 
contain a transfer to QP(MOP). Then this transferals executed. 

At BRRET (return from a break signelr>- we re-depress the console input 
level and go to RETRN. ~ 

At RETRN we store zero in JIPR, JDPR anf JKQV. Then we test to see 
if we are in mode 1. If we are we return to riAINOP. If we are not in 
mode 1 we first decrement LKOP in anticipation of MAINOP incrementing it. 
Then we return to MAINOP. RETRN may thus be used to return to MAINOP 
without changing pointers (for example when an error occurs, see 2.60). 

CALLOP demands that all subroutines from OP00 to OP99 be present. 
Of course we rarely will have all 100u.of .the .subroutines in memory. In 
order to circumvent these difficulties we make use pf^ the fact that the 
BSS loader will, if presented with several definitions of one program, 
simply accept the last. 



,^#*^N^i' 
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SUBCAL FAT deflnlralT "Subroutines from OPQO To 0?9#, If there is 
no other version of *r given subroutine loaded, ihe» CALL0P will actually 
call SUBCAL. j If a - itibr^utine* has actually been jloi|i#d thfen this defini- 
tion will supersede - ttje definition in SUBCAL an| th«fc rouCinawill be 
called instead. - 

Thus if iwe call ifi .operator which has not been defined we enter at 
OPXX. We begjiftOflOae^utoceioft operations which leads us to the message 
OP. AB IS NOT iffiT B g FH ffi g and 1 we return to MAINQP through £ETR# (thus not 
incrementing pointers)! . 

There ate~l^ftrTmcrvs ±rr "GALLOP FAP. They are called TRANS and FIX. 
They operate in sucli a J way as to insert at location OP 100 transfers to 
subroutines named O P OO 7 OP01, . . . OP99. 

The macro CTSS simply is a convenient way of enabling one to get 
at the CTSS system subroutines, in this case, to write a line out on the 
typewriter (the a0pmn#a0tgS WRFLX) . The other thrttI^cf«^liREQU, 
TAB! and TAB2) simply jdef ine all of the entry points to 4e equivalent to 
OPXX. 

For those wKd {fcLghfc be writing FAP operators-, ith% miy detect mode 
by testing the sense' indicator! register. The consents o£,tfie ^1 for the 



various modes are 


as 


follows: 






Mode 






Left 


-Half 


1 








37t 


2 








57* 


3 








67 f 


4 








737 


5 








75? 


9 








77^ 



.EL$ht-Half 



400 
200 
lOfi 
040 
.020 
0&1 



Thus the command RNT 40 will execute the next instruction in sequence if 
we are not in mode 4 and will skip the next instruction if we are. 



^^^^^^r^^r^^^^^r 7 ^'^ 



X-****^^'^'* 1 ^^^ 



CALLOP ENTRY 



1.45 



5/15/64 



First time 



*, 



"TFMEF M 
See entry to 

Depress QC1§ 
level-* saae 
return as OPs . 



/-•>•.) 



Thereafter 



;o"i«i 



Set up 

nsv#*n»e" 



l^f! 



ik 



transfer 
>te >Of y#*&€(MOt) 



h-, » on% fiiffig^ag rrt' * 1 



.i?k;;:[. 



'1 'OJ-Jfl 



_. b§eutft..... . 

Transfer 



. . ' , fOTf) r 0O1f; tej;; ' :.,h ?ft;u. }; 



RETRR BUTRY 



N/ 



3iPR f - 0: , y 
JPPR^= t~ 

JiCOP * 6 * " 
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COMNAP 



Purpose 

The COMMAP routine is necessary for defining" the data base, or 
data elements that are in COMMON storage. It if tised by OP.'s 15 *ftd.'.16 
to locate individual data elements anywhere in the COMMON storage area. 

Operation 

COMMAP is written in FAP and makes use of * macro instruction 
called COMSET. The COMSET macro is a rather complex one. It performs 
the following functions: 

1. Each time it Is expanded it increments It by one. 

2. Each time it is expanded, the variable named is placed in 
common. T . 

3. * The natoe, address of the vfcrla%Wi {mlnu* 1) » and I>JiK d!K*n^ 

sion is placed i& 4 ; table. 

The entry points TABUS and MAX ane used, by GET and PUT* to obtain 
access to the given line of common. EB%entlAily t&e process is this. 
Given a common line number, we test against MAX t^* se* if ^ atofc beyond 
the range of common defined. If we pass this teat r TABjiE gives us the 
base address and dimension of the array ■rfcfafctfcfcSi'. From this information 
we can compute the exact address of the tell r#N*enced. We use MAD (and 
thus MADTRfi) type indejtingv and thus this ij&forination is available for 
compatibility with MAB (and M^MHRN^ programs. 



*See discussion on Service Routines, pg. 2j,40. 
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We refer to common storage thrpuj^i "line numbers". The line numbers 
for system common are as follows: 

Name of Common 



Array 


Line, No 


K0P 


.- ' ■•■;:■-!■.•./ 


IPR 


2 . ,. 


DPR 


. . .. _. 


JIPR 


.:■.-: ■■ j.:;-.-.*;... 


JDPR 


5 


LKOP 


6 


LIPR 


7 


LDPR 


% ■■■ 


MODE 


9 


NROP 


10 


JKOP 


11 


MOP 


12 


INDEX 


13 


ISAT 


14 



When the user defines some common storage for himself (usingpthe procedure 
discussed under "Updafcingpf Cojpm«gi; Map%i*his J.j.ati,^* simply attended. 
For example, if the user adds to the comm©» above: "- ! — ' ^ s ; ?~ 

r «IMraJSIONA<39)i«(27,5,^ ' n 

and* modif ies CCMMAP by addinjgi ;■-.'...-• .-■-:-■. 

COMSET P,0,0,0 

<3@M3IT X, #7,5,2 L-.c-r:=.-.--=^rV 

COMSET A,39,0,O , : ., 

then P is tine "15, X is line 16 and A lirliitie- 17v'1fe^f«« v to\* given 
cell within an array we simply mS& the iiiiieli. -v 'WbxWxatopi:* to move 
X(22,3,l) to P using OP 16 we would enter as arguments to the first printout 

("FROM LINE XX(XX,XX,XX) CAR RET. FOR PARAM") 

16 22 03 01 (Line 16, Cell 22,3,1) 

and to the second printout 

("TO LINE XX(XX,XX,XX)"etc.) ^ 

15 (or 15 00 00 00). 
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MPARAMS 



Purpose 

PARAMS is UiiA only by the e*perl*tt<ited us«i««tBar kWOWs ekaetty the 
number, meaning, and order of parameters he wishes to enter into any OP. 
It deletes the printing of all guideline}! describing the parameters, and 
checks only to see if the correct number of parameters have Wen entered. 
PARAMS is only called by MAINDP whenever. :t&e ii&& -4M -«** to 9, 

O peration 

PARAMS first reads tha integer paraiaiJfcJirB. They are read one at a 
time, and non-zero or plus zero parameter s are stored in the IPR array 
and counted. When a minijs zero (-0), which is equivalent to a blank 
line or initial carriage return, is encountered, the number of parameters 
counted is compared with JIPR. If Jlf^if negative, the check is omitted. 
This is used for 01% with variable number* of parameters. If there is a 
disagreement, the program complains and requests that the integers be 
retyped. 

If the count agrees, PARAMS reads th* decimal parameters, and stores 
non-zero and plus zero parameters in BfR, e©kntinj them* Minus zero 
causes the program to aheck the count with JDPR, unless JDPR. is negative, 
as above. If it if not equal, it complains as above, allowing decimal 
parameters to be retyped. If the count Is equal, it returns to MAlNOP. 

Note i 5ffth integer alid decimal ptftttt* #$* '*«** *#*: Pi *? format . 
Thus btttfr. integer and decfcttl parameters must be typed with a* explicit 
decimal point. Since -0 is used to signify end of parameter list, zero 
must be explicitly typed in* 
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1.65 
Subroutine PARAMS 



5/15/64 



Set B for 
Int. 
I — ; 



Read one 
integer 
PARAM 



Stores in 
BPR 




Rea d on* 
decimal 
PASAM 



Error 

~ ; Mea«age- ; 




Is 
JDPR 



> 


' 


\>^ /^ 


Return 
to MATNOP 


/ 
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to the right indicate the modes that must atid oust not go through each 

i' o'ic/i'id Li-iJiiiq s'i vsm t q-.;.;s t ?0 *u;oy 3o gainer! s/'i fx. j;-i'u(' c >u:i r ', 
step. Going through a step is optional for mode numbers not shown. 

.q9.l£ 9.3;!.?fiX9 ■;.-;■.•■ J qs. ,; i-: 



jStepji 



A. Subroutine OP XX 



Must be uttd by Modes tfttat Jfet Bfe Ua#d by Mttdea 
1,2,3,4,5,9 



B. Storage Map 

Defines Common Storage 



C. If MODE = 9 
GO TO 9 



D. Local Variables = IPR, 
DPR (from storage) 



E. IF MODE - 5 
GO TO 5 



Print Guide Lines 
Read from console into 
Local variables (carriage 
return in mode 4 causes 
stored valued to be used) 



IF MODE = 3, 
GO TO 3 



H. Execution 



IF MODE = 1 
GO TO 1 



Set IPR, DPR = local 
variable* 



Information 

Set JIPR, JDPR, (fixed) 



1,2,3,4,5 



1,2,3,4 



1,2,4,5 



2,3,4,5 



L. Return 



2,3,4,5,9 
j 1,2,3,4,5,9 



5,9 



3,9 



1,9 
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The OP must be written to read in and execute with variables local 
to this program so as not to clobber common storage when a simple execute 
(mode 1) is used temporarily in the middle of the execution of a KOP. 
Normally, do not change mode in an OP. Leave mode changes to READOP. 

Depending on the nature of your OP, step 3 may be placed before or 
after step 5, the execute step. 
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Writing and lne»tp&ratlni a; an* ofc 

All of the foregoing structure except the execution step has been 
preprogrammed in MADTRN. IP( } and d£( ) ate used as local variables for 
each OF. Ttt6 elteetttittn *t«p has b«e* 4**rast*€ aft* pltiefl it the end for 
easy construction. Control is transferred to it (statement 5 CONTINUE) 
at the proper time. You complete the patch by tf«nsfft*f iftg control to 
7 (GO TO 7) at the.endof the > execut ion r Step, which ypu write. 

A. Construct common forms to suit your needs. 

1. Start by EDITing one of~ tbe fallowing forms from COMFIL 1 
{or build you* own in, MADIRl^^ a*,fAF if desired*): 

a. BFORM MADTRN for Both integer and decimal variables. 

b. IFOHM MADTRN for Integers only. 

c. DFORM MADTRN for Decimals only. 

d. NFORM MADTRN far go variables at all, 

2. Insert additional DIMEN&I^ittaiements in lines 41 to 59 
with the common eleftl^jt'a., fifcit*. . 

3. a. Insert additional CC&MON statements in lines 91 to 99. 

b. Modify and recompile COrai^ to agree. See "Updating 
of cbMMp n . .-..,■. 

4* File as your own ^CM for sufeseque^t^se. 

B. Buiid the OP 

1. Edit a suitable common farm* constructed as above, 



2. Change line. 10 to read Iu||OutlPfl^«^t'» the XX is 
your Of number. Normally, use numbers between 20 and 90, 

3. Change line 20 to read your name and the date (of most 
recent change) . 



*Alternatively, the shorter FORM MADTRN or FORM FAf (also In COMFIL 1) 
may be used aa a basic beginning in which s*a8B E th» peegratmmer wo«ld b«ild 
his own structure and use only part C of these instructions. 
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4. Update dimensions of £p and DP on lift*; 50 if desired-- 
these were set at 10 each initially. The dimensions must 
be changed if JIPR or JDPR exceed the values in the 
common form. 

5. Set JIPR and JDPR on lines 100 and 110. 

6. Add formats, for printing guide lines* on line 560 and for 
reading IPRs and/or DPRs on lines 570/580 if needed. 
Standard f6rmats J will ^compile if ho£ "iifciinged but will 
npt read; inputs,, h^k. ; i:| -, .*■:■,.:: 

7. Construct the execution patt of the OP starting at 
location 600 in either manual or automatic mode. 

8. Finish with statements GO TO 7 and END, 

9. Pile OPXX MADTRN (6r MAD or TAP) where the XX is the number 
of the OP. 

C. Compile and Incorporate ** 

1. MADTRN (or MAD or FAP) OPXX. 



2. Delete OPXX MAD (unless writing in MAD), OPXX MADTAB and 
OPXX SYMTB (if using fAP) . « > c 

3. Load the hew COlWAf fi£s*; J followed by tthO OPS package 
(containing SYS r and Ali&P) '■', and iSien your personal OP a. 
The reasons for this sequence are as follows: 

a. All the COMMON storage required in any of the OPfs 
must appear in the ptbgrair loaded first. 

b. CALLOP in the OPS package defines all OP numbers 
from'O to 99 f ; if you loat! *%h£ bPS package after your 
personal OP'a then your OPS will be replaced by the 
dummy definitions of CALLOP. "' 

4. BSS files maybe combined for easldr' loading by using the 
C0MBIN* command. Be sure to use the * since resequencing 

■■-. clobbers^he BSS instructions. - {sArpg. 1.70)' 

5. Do all this on your own number; not in CQMFIL! 



*Guide lines cue the human as to the contents and positioning of 
the next console input. 

**See Chapter IV. fo* on automatic way to perform these stops using -OPS~l. 
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In writing an operator, it is essential to understand clearly 
the different sources of the parameters, called LOCAL VARIABLES, 
that are used by an operator during execution. LOCAL VARIABLES 
, must, be, 3 |u||ered a from the parameters Jt^ed in, at, the console and 
the parameters that are (possibly) located in the IPR and/or 
DPft *t«fts>*a that all ©£ifch*«l>ptlon* a*s^l«te« with the six 
modes can be performed. It is convenient to use the following, 
definitions: 

1. LOCAL VARIABLES: the values of an OP's parameters 

_ act.pa^,^ used during execution. 

2. TYPED PARAMETERS: the values entered at the console-.- ■ 

3. STORAGE PARAMETERS: the value* already in l«l and DPR 

storage. 

Using these definitions, here is what happens in each mode: 

Mode 1 - The TYPED PARAMETERS are placed only in the LOCAL 
-■hi t: IwaUPtBIiBS 4nd»che3(JF is axecutad. ---'! 

Mode 2 - The TYPED PARAMETERS are placed both in the LOCAL 

VARIABLES and the OP's STORAGE PARAMETERS and the OP 
is executed. 

Mode 3 - The TYPED PARAMETERS are placed in the STORAGE PARA- 
METERS but the OP is not executed. 

Mode 4 - The user is given the choice of using the STORAGE 
PARAMETERS as the LOCAL VARIABLES or typing in 
TYPED PARAMETERS to be used as LOCAL VARIABLES. The 
user must take some action for the run to continue; 
if he wishes to use the STORAGE PARAMETERS, he hits 
c.r. The TYPED PARAMETERS must not be placed in the 
STORAGE PARAMETERS. 

Mode 5 - Parameters cannot be entered from the console. 

These arrangements are mandatory for several reasons --perhaps 
the most important is permitting the use of Mode 1 at any time 
without destroying any parts of the OPS system. Normally , 
mode changes should not be made in an operation. Leave mode 
changes to READOP. 
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Updating of Common Map (COMMAP) 



To keep the common map up to date, it is only necessary to insert 
lines of coding for each array or variable added to the common list. 
These lines take the form: 

(tab) COMSET (tab) NAME, I, J, K 

where NAME is the name of the common area, and I,J,K are its dimensions, 
for example: 

COMSET KOP, 100,3,0, 

COMSET MODE, 0,0,0 

etc. 

These lines should be inserted at the end of the TABLE list, and just 
before the line 

MAX PZE N 
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Service Sn^tutiiiea 



Several subroutines are used by <?P |g j|o rf^jf^«ive 89«l iltP^iainf fi^F^ 
mation i»;j30||MQJ^ These subroutines can fee Jffed; byafny opat§*o5< tfe.: ,,; 
will describe the affair ej|d q thi~ea;Uiijg.i§Mueaea ;:f*ffr>M«te. pf *ha#eu > 
routines below; .;-, ■,,;,,, /i :.„: . .,. e . :; , ... .■ : . !l „ ; . , ; ^. * ■..? 

CALL gBT^iI^.K^jfefe^exis^hi i (J^J^fcb, fi«a§at jjf, tba U^ L Una of 
COMMON* I^-pl*|faia^« co^inMjalot^a-cell^pelf^iJigeds^ §;£*!*■*§&' T,^; 
called KXCH. .;;., -, . ■.-. J:l - : ,., r ,, .- -. , -. , ■:,,- , -, r/ .-.^; ..... •■ ,,; .- 

CALL n PflT£L,J,J t K) places v *hf, centant^Qf tjhf ..pc^.regiksji? infcp tfce 
(I, J,iQth elements* trbf rL^iio«.,o^ggHP^ t ,. v , 3ui; .' ...:,, T . 

CALL LlW^laee« the content! df A lit teftiHXett register i 

CALL EE(A) places the contents of fehe KXCH register in A. 

CALL 6STL$T(L»J,J) ,p*ac f a,.t|he,spi|te»t» : ,pf,fche .?&b Fi^Wfttif TasS«i«l? 
parameter if 1-0, decimal pa*ej*eteT "*#<Jfrliy,o« ffe# L£h H«f °*o*kf ;K0P f . 
list in EXCH, . ,,t , : .,- c .^., .-; . . .,,,.,, .-,v :: 

CALL P0TL8f<L,t ) J) placet the contents oFI!hi 3 EXeH»re$iseer into 
the position of the 3th integer !**# or - «ftttifiil ( :f i x*i) -para&*tir : of the 
Lth line ef the RCP list. ■■'■''- J<^ :;x <' ■-:"*■- ^ -"■• *-'i 

The function OCTALP(I) has a value which is the octal equivalent of 

':. ':■'■)'. - ■-..-.., ■<;.-; -■■..■■ -.-:'. •:::.] i,:y:<:,o^ ^?n- ]■- .1.1-. - 

the BCD number in 1. 

These subroutines are available for use by any operator. 

Note : If one gets a parameter from the DPR (for example) and empties 
it into I, there will be no conversion to the integer mode. 

CALL LE(X) 

CALL EE(I) 
puts the contents of X into I, but it does not convert X to an integer. 
Thus I looks like a very strange integer. 
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Creation and Contents of Combined BBS Files 



The GTSS operator C0MB1N *X BSS Y 2 A j . . . -has the iff ict of 
combining th* fliasY BSS/Z BSS r A B3S, v I'VV^ttaef-tril na»y ! %^SS: -■"' 
This feature is Used to ? Mke J ffe ; ilsi** 1 *:© load plftitriai^dnt^-a^few e&ffl- [ r 
bined files, replacing many individual files). 

n Thfe fifa SYS BBS, f W> example, contiins s fBLj^r-BsSf CAlLdf BSS, 
READOP BSS^PJtRAMB BBS/ S8RV1C BSS^-THfe^cAELO^BSS^and^SERViefBSS files" 
are themselves combinations of further individual files. 

We have eiitabiishfe^th* procedure of °dit:ini D eich PAP and HABTRM 
file. It is impossible, however> to dsite' the^BSB^f ilfes £8r -any such infer* ' 
mat ion would cause them ftp opf rate incorrectly* r , jFqjj ,th4§ s r|ase[nj we rh^ve 

established the procedure of creating files with such names as SYS FACT. 

. /• n... Ti;-:;;:?-; S-\ '?.''. -vi r." V: s T.n:-..Jn;i:. ad" sHoaicr =.'AK.f3 ,LJA1 
SYS FACT simply contains the date on which SYS BSS was put together, along 

witK"I & deicrifJfci6'n of the Contents ^fSYB.^-FACff ilea will usually 1 : 
appear^ ifcily for flies for whicn°nd-MADtRN '8r*lftP*f Ue ^xtats^In^a-few 
cases, however, it is necessary to point out some peripheral facta;- and 
one wilj , appear, in the«e4caafsio M9X «X*mpie rrCAM-QP FAP ^sthe routine 
which does thr, calling of jeperjifojcs. CA£W?P 3SJj s however, 4s ..a. combination 
of this file and one called SUBCAL FAP, and thus the f *}e GALI^P ?ACT , , 
appears, and makes note of this fact. Should the user wish a part, but 
not all, of some combined file, he must copy each part from the COMFIL 
and combine them under his own number. 
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Error Conditions in Subroutines 



This note has two purposes: 1) to explain the behavior of OPS when 
certain error condition* arise; and *fto giye'the user a method for"' 
handling error conditions within his own Subroutines ^ ' ' 3/r ?rs 

If we have a subroutine which is coraon to several operators (s V ch 
as Gfef; etc:, which is coupon to OP ^6 and OP* lV and^other^ and m 
error condition arises which is uncorrectable \rithin "the subroutine, then 
we have a problem- b«c#u*p if we ^m^ ^ ett* <^iing^bpWor% will 
behave S8 though *he subroutine he* ^Jfe^ted ^bp^l^ Td get around 
thM vert*** *m have »seeblished a re*i*h *&&&& without incrementing 
any pointers regaiKliess of »bde. ■ '• ^ ■■->--' ■' v-:9j<,^.-; =-; ^.m- 

To use this error routine siipply (JAU, RETRM, qontrp.1 will pass to 
RBTRN Cwhidh is actually part of CAMJQP) where „e will test, mpdp. I_f fa 
mode 1, control simply passes back V^BIOP.'' ; 'if In »w of h«- I^P , W ' 
first decrement LKGP in anticipation of" iS^s in«eaenting it. In all 
cases v* W^»^|W||| WW t«F te^.f flms^^feitevei/the nbde; we 



'*?-:^i^5^^^-'^^^^^^i'^>^^ , 5^^g^^-^i.- 
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Variable Numbers of Parameters 



ers 



For certain operators it is necessary that the number of paramaty 
be variable (i.e., 0P*s"9i and $9 described in. Chapter IV). Certain 
problems, however, are created by this and thig note will attempt to. . f ^, 

explain, mode by mode, how they may be resolved. 

:■>■■.<:?') :=-< 3 £-■-->-< := ii;.{s;v=J3 o3 re -v~-y> i.j aiJ.'jw :hu "'.'.' vu.i <, ^v^.;: •> ^ 

In mode 1, a variable number of parameters clearly creates no proMemj 
-v,. hu- .<*?<,;.>:■; ^ el "iO .our. cH 10 oJ nrorzrm.i Bffl5^' , ,y5s T ■!■*<-< e* 
since the parameters are only used locally. . ... 

,In modes 2,, 3. -and &j ;we ar» reading jth#j pajeatjaftar** f rom tehe= aoneolfeFW 
and thus we accept howe^er^-j^y, ,a^ oflft restriction aon *h»ae 

modes .is. that .if ( w<e,.are (^^^^.^^^^{^^(iM^^r wa must thtitfomefufcr) 
not to enter more parameters than there is ,ajffta£.i T&HMtt i££a$m esrameouslyr • 
enter 7 parameters for an operator on line 5, we may go back (say when we 
are "how oh" Ifhe 10) and enter six parameters on line 5, but we may not;, ,, ,_ 

..? Ti ,Krv. j-1 rr/rf 3W snrrf CT0JJA3 10 3isq \ll ^ 3"-.E .! .C P'jf;!tf7 RW^i 

correct" it to eight parameters. If we need eight parameters,, we must. 

y„ .abMiii, -t-:,:'. - *i;*o? -li II .W.ittf "^ >bfcd 3388Bq viqmJB .iG-flH^:: ,, ^ .::.(.'. 

return to line 5 and continue from there. 

In mode^ 5., the,, routine muejt know^cw; nam Pft r a nnflw: a, JHKK, uaad by fci«v, 
the OP. It can find this out? hy. 4tef^m<$«§fiW*£ J *0®&*2 «tfte*ndb . ■.-...> .■-■: 
K0P(LR0P, 2 or 3). 

In mode 9 we must notify the PARAMS routine that any number of 
parameters is acceptable. This is done by setting JIPR or JDPR negative. 
PARAMS interprets this as a signal that whatever number of parameters are 
entered is all right. 
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NO OP (OP 00) 



Purpose 

The main use of this OP is to replace OP's that you wish to delete 
from an already constructed KOP. 

Operation 

1. No parameters. 

2. If mode is 1, 2, 3, 9, set 
JIPR = 0, JDPR = 0. 

3. If mode is 4 or 5, set 

JIPR = K0P(LK0P+1,2) - K0P(LK0P,2) 
JDPR = KOP(LKOP+l,3) - K0P(LK0P,3) 
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PRINT KOP (OP 10) 

Purpose 

Prints KOP's and associated IPR and DPR lists. 
Operation 

Prints out: 

FROM XXX TO XXX (XXX referring to line numbers) 

Will print out from H to N -1 in KOP list. 
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LOOP (Op's 11 and 12) 



Purpose j . .,.,-., r( -._ t 

Uleae two QPk ,|l*ovide-a fieani fd* 8^t*ii*%d-*ip^t>ife±en-©f i any 
sequehee of othet aP'Si £H*i*jimit*e*aB< tliitf ifc^rad ion tjf Strings df 

referred tbot ^l^r^d i by g t^e v O|*? fT of {$e se^nc^^y virtue cif; the 
nesting feature, the LOOP OP themselves may be elements of the sequence 
of other LOOP OPhk OP 11 Is used to initiate a loop, and OP 12 to 
terminate the range of the loop's sequence. 

Parameter a Used by OPJb 11 arid 12 

1. A one-digit integer to designate which of nine 1x4 arrays in 
common is to be used in the loop defined by OP 11 at the beginning 
and OP 12 at the end. the tiine arrays allow loops to be nested 
nine deep. 

lNDEX(i,l) is the actual value of the index 1. 

INbEX(i,2) is the highest value index i Shall be permitted to take. 

INDEX(i,3) is the incremental step by which index i is altered 
during each cycle. 

INDEX(i,4) is reserved for internal bookkeeping, and refers to 
the range of the loop. lNDEX(i,4) should never be 
used by a programmer, ttor need it be. 

2. The starting value of the loop index. 

3. The highest value of the loop index to be permitted. 

Note ; This value may never be attained if the increment is 
greater than 1, but in no case will it be exceeded. 

4. the amount the index is to be incremented during each loop. 
(This is set equal to one if read iti as zero.) 

These parameters may be read in by either OP 11, OP 12, or both. Any 
parameter read in by OP 12 will replace What was read in by OP 11. 



3.31 5/15/64 

Operation 

1. Specify OP's and read in parameters while in mode 3. 

2. During execution, the OPs will test to see if the loop is 
satisfied before executing the first pass. When the loop is 
satisfied, the KOP will continue with the OP following OP 12. 

3. It is possible for any OP to modify or refer to the value of the 
index, the increment, or the final value, during its execution. 



^^Sl**pS^^'^^^^ 
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l&iiai-i'hr>'j 'to 3 f j\^ 



i, taV - I~g 



Tte7 >f ib'/ 



Objectives 

OP 13 and 14 are; umatPtfo Tadtotral .the .sequence in wfcich ojserators are 
executed in a KOP. (IPAy*<Hw»W control to .conditionally -bwaach to the 
OP 14 which has the tieM\f^64*em»t«s . . Any number ,o£-OP KE's may 
branch i9 t g O i .the fi a^a £ 7 P B J4. o . i3s f]s ^ £ ^ oJ 8ni , nloq a ,, 3 «*f^-«q i>-«3 :. I 
Parameters used bv OP 13 c is :J Jsu?:> 

1 . A mto<a±g*tx amfcageai between «B) «** ijft #mM»qs;i»jsa»f*|m»*0s»jtiemJT 
in a single dimension array in common, ISAT, which contains the 
LKOP of an OP 14 so that OP 13 knows where to branch. 

2. Parameters required by GET routine to retrieve the contents of 
a location in cannon. The contents of this location will be 
referred to below as Var 1. 

3. Another sat of parameters required by the GET routine. The 
contents of this location will be referred to below as Var 2. 

4. The type of conditional branch. 
Parameters used by OP 14 

1. A two-digit integer between I and 30 which specifies the loca- 
tion in a single dimension array in common, ISAT, in which the 
LKOP of this OP 14 will be placed. 

Operation of OPS 13 and 14 

1. If all parameters are aero except the location in ISAT, OP 13 
executes an unconditional branch to the OP 14 which has the 
same first parameters as this OP 13. 

2. Otherwise, OP 13 executes a branch to the OP 14 with the same 
first parameter when the type of conditional branch is satisfied. 
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Type of Conditional Branch Relationship of Var 1 to Var 2 

E- - -0 Varl = Var 2 

NE - -1 Varl ± Var 2 

L - - 2 Var 1< Var 2 

LE - -3 Var l^Var 2 

G--4 Var l>Var 2 

GE - -5 Var l^Var 2 

If the parameters pointing to Var 2 are all zero, Var 2 will be set 
equal to zero. 

The only parameter called for by OP 14 is the location in ISAT. 
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Modify Operation (££ 15) 



Purpose M ., 

Of u 15 n 4s A .uftiU^y o»eyatioi» of the OPS System, which allows the 
user to look at t;h% extent? of. ia«y single cell in COMMON storage and to 
change the contents, if desired. The cell in COMMON storage can be in 
the data base, including £h« KOP sspd f«ra»et«r li*t*i * Alt'eell-leca^" 
tions can also be specified by indirectly addressing the particular OP 

of interest. , .. , ,... 

As presently written, OP 15 is abl,*, tQ deal,wi#l onlyjOne cell or 
word of COMMON storage at a time. In the future, i,% my bf desirable to 

provide for printing and possible (selective) modification of blocks of 

r r .... ,-.;_., to MJisv ail J ;? . Lr'd •;- 

COMMON storage at one time. It would also be advantageous to address a 

line of the KOP relative to this OP 15 when it is being used. 
Description of Parameters , ,..,. c; . 

fluidg Ij-nag vjIU be printed as.shfwn fealew when.QP-k! *i< e»Hed in 
modes 1 to ^^ncitiaive. This is a 5 re^MSt^fdf ^tha'five integer parameters 
which OP 15 requires: CODE, LINE, SUBSCRIPT I, SUBSCRIPT J, and SUBSCRIPT K. 

1-FIX DIR, 2-FLT DIR, 3-FlX 1ND, 4-FET "THD 
..,:•.• GUI 8SJ gSJ 8SK 

User types >-. Wm JSXX XXX XX* 

Five Integer Parameters ' 

I* CODE indicates both the type of data being addressed and 
the method of addressing. As listed in the first line of 
the guide lines, the alternative values of CODE are: 



l--direct addressing; integer data 
2-idirect addressing; die imal data 
3 — indirect addressing; integer data 
4--iridirect addressihg| decimal data 1 



■ ^H^Sfte^J^^V 
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as 

> -r ■-} ;i '3frvi. 



Direct Addressing 

2* LINE of COMMON storage 
being addressed (see 
MAP MADTRN or MAP FAP) 

s V ' O • ». ' \ ■„■'•'.- v; :*• 3 .1 S Y <"! 3 \- >' ' ; , ' ; 



ift# r ?&A idre * Bln g 

LINE of KOP which contains 
the OP whose IPR or DPR 
parameter is being studied. 
•This - i ffI s tKe a?ba<>l%t* Sine^o*^ 



SSI is the value of 



Relative location in the 



OOJ. 

or'"' 



o :r P. Si ' 



I in ARRAY(I,J,K). 

'■J _.:;i ...-o-iLbr, -/.: .)- 
is 1 or the cell 



,iU, ,;..t-' "is.. 



If I 

being addressed is not 
:; ' ah array, ' ; zer6' ,J or' :j on'* d: " 
-iB.rxasi^^ be-'used.r" " '•' : ' -"'''■• : 

"TT SSJ is the value of 
Jin ARRAYCijj^) 



selected OP* s parameter 

[ell v-J b->j. J i:oee. : scf oair.- rrs-' «;:.-ij 
list. (A or carriage 

return will be set to 1 by 



■«i$ I 0fr' ; 15C)'" 



(not used) 



J TV 



1,-:- 



:mmo;; 



:'' si l'i3 l- ,; HVi j£j.5j 

(not used) 



5 SSK is the value of 

K in ARRAY(1,J,K) 

*Only t•he'•iir : st y tV0■^titfieB-•are■ mtstoiefir?* i-tt '^l&MyiMpJMM&i 
.variable is^npk n 4imGnsio*$l s t^^ fcaji .■be, ?boi , 

entered followed by a carriage return. 



One Decimal Parameter 

— — Mil ! IM W.J J, I I ' ." ■'. ' , .:- 

OP 15 can be used in mode*^4' and 5 to automatically initialize, 
re-initialize, or change a data I woM^in^dOlfliO* ste#£ge bysjpfutting 
the new value of the specified word in the^DJ^, Iig$ aj^QP^ ^5' 8, ,Qne 
DPR parameter. This parameter, be it integer or decimal when used , 
is always stored in decimal form anSlRu'st be entered em the console 
in decimal form. 

;■■*-- J "s- ;■ ': • :,■:■■/ .. :t. -,fls.i:s s-', - >.<i;>l * ^ht.',« «-,;^ 



Operation of OP 15 



:!..: 



To clarify terms in thej description, by?. w4fi» tjb,§.,fgHowing definitions 
are given: ,,_,;. : ,,- r .„.. . r >r% . . ,.,<■,.:-■-,„•,..:• 



VARIABLE: 



thg r cell or word t J.n r> C0^©^ ?l;pr;f|tejj.be)irig referenced 
by this particular OP 15 for inspection and/or 
possible modification. 
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VALUE OF THE 
VARIABLE: 



PARAMETER SET: 



REFERENCE: 



PARAM VALUE; 



(PARAM VALUE, STORAGE VALUE, NEW VALUE) 
When speaking of the value of the variable we must 
specify where •»-■* in the paran»et#r set, in COMMON 
storage, or being, reii* from the console, 

(REFERENCE, PARAM VALUE) 

The six parameters associated with this particular 

OP 15. 

the five integer parameter* which specify the 
location of the VARIABLE in COMMON storage. 



the one decimal parameter which is needed to facili- 
tate the automatic execution of pP 15 in mode * k and 
5. It is used to reset tWBTPRAGE VALUE of the 
variable. 



STORAGE VALUES 



NEW VALUE: 



the value of the referenced VARIABLE in COMMON 
storage. This is wj&m*: W»$ to represent the 
current value at the tipft this particular OP 15 
is encountered or ithen the f 4n^»4.ry ijk made. 

that value of feb« VARIA*J#',wh4ch is read from the 
console (as typed by the otser). 



All modes prior to exit will set JIPR *■ 5, and JDPR =* 1. 

MCffiE 1 : OP 15 will print out the guide lines as shown above and 
read from the console thf R^EJUNCi parameters. If a 
carriage return is given control will be jreLsased from 
OP 15 (i.e., RETURN is given). 

The STORAGE VALUI of the > variable *& ?efef enced will be 
printed on the console. 

OP 15 now asks for a NEW VALUE to be typed OR the console. 
It must be typed with de?4fwl point re ftardlas . s of the 
'gffSimptfi 1 ^ iq.fof .fifftt v ,gWtfftfffr-t:«-it-- it is to be an 
integer, the OP 15 will make the -ne^stsjsary conversion. This 
conversion removes the necessity of typing in redundant 
leading zeros. 

The value so typed will replace the STORAGE VALUE of the 
variable. 

If a carriage return is given no change w;ill be made to 
the STORAGE VALUE of the variable. 



:i#3*^^.8eSgg^^ 



af^-ife.--,^ 



wgs^'.'^aat.-s.i 
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MODE 2 : As mode 1 except that the REFERENCE parameters; will; also 
be entered into 'the KOP list W tKIir ; ^ticular ? GP ; '¥5 and 
Che PARAM VALUE of 7 the variilfli# i W«111ii i set equal to the 
NEW Vkimm one is typed on tte ^oniaft^e, or it will be 
set eq^al to the STORAGE VALUE 5 if'-tf ^carriage return is 
given. 

MODE 3 : As in mode 2 except that the STORAGE VALUE of the variable 
is left unchanged (this is the no execution feature of 
this mode). As before, the FARAM VALUE of the variable 
will beWet denial ttf*the HEW VALUE if^bhe is type^& Qv; 
the conSMe, or it will be set 5 eVpkl to 1 the STORAGE VALUE 
if a carriage return is given. 

MODE 4 : The REFERENCE parameters, having previously been set, are 
1 printed -ott'the console ^tmftietfiately^^foliowing the guide 
lines. If a new REFERENCE is fcyp&i^inyit will replace 
the old one in the KOP parameter list for this particular 

'--'■ ■'• OP 15. ■ If a ^eatftfiege^ returti^iff^ivett^/^o ^bkge WM/^k 
inadef in the Iffl?EiQBIOlB*. '■--' :r ' :J? - 

' Note' : If a change itf to T?e made, «M- #ive of the parameters 
must bi£ retyped" on the console'* > ;v 

The STORAGE -VA&BK and PfflU^ VA^»Mof ^the varia^e> sc ■ - 
referenced will be ejped oiif tiKe console and OP 15 will 
then ask for a NEW VALUE of the variable to be typed on 
the console.' -' ■ : ■' <- j - :; -" ■ ! "-° i1J -"^m s--*-o^ ma 

■■■■<'■'- The value so typed (vith decimal ^birit-*-see Mbde l!i„Mll 
replace both the STORAGE VAi^ aiM 1 *t»^ mR«l VALUE of the 
variable . ; "''-'■ "■•'■-■i>; - - ;^wi?-i sjsirjpj 



If a carriage retu r n is given, the PARAM VALUE will replace 

th¥^om6Evl^ 



MODE 5 : In this automatic KOP execution mode the only action taken 
when #P 15 is encountered i i#'!^at*««ai6'WC0tiAGit' VALUE is 
Jr../'»^ii&*tl>y- , dhA- PARAM VALUE Ho£'tK£ v¥rfia&le ^ferenced by 
"-the 1 R^ER^IKMiM^BrattBe^ the console, 

This action might be useful Sin'stwS^^ortfisB^b^^initialization. 
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MOVE (OF 16) 

Purpose 

The purpose of MOVfc is to allow one to mdW lanylieti in cBfemon 
storage to any other common location. '"' 

Use ' ia: ~- 

Each variable and array in coramon is assigned a litfe itumbeif f or 
external notation; These'are assigiiitf iti brdiif, 'T:k . ', ; l-to^f 2W?R : , 
3=DPR, . . . etc. We would refer to KOP(62,2) as 01,62,O2,Ofr irtid MODE as 

This i operator has eight integer Iparaaitef is . 

References may be made directly to a common cell., or indirectly 
through the pointer list to the IPR or DPR. Such a reference is made 
relative" to "the "cdrrerit lJt0P f and' 'talees 1 ^ft* ;i &ti<^ng» f Torttr ■ ' ; '■■ f ' - 1 : 

which references the iitfCSth? parameter "o^'thSe *£&(&&&)' or 1 DPR(X*8*^) 
of the (LKOB*RBJJtT)th line of the operator list.* 



Entering the opecator cau^» *hi», aft««a»% ffftOH WNE (Jj^lC) €AR. 
RET. FOR PARAM to be typed. If a direct ref evince?' is desirld ifte type 
the link number and as «aayr indicies a* .me«eaa»*ir.; If «b w4«h to rn^lpe 
a relative reference we carriage return "'ana' ^h6' ■wa'aage 

RELAT^ 0=*I?R JM)m, INOHU is t3BP«A. ;&8*«H >«% %yP» in* . fche 
parameters indicated above. 

After completing either of these procedures, the process is repeated 
for the receiving location. The message TO LINE (I,J,K) CAR. RET. FOR PARAM 
is typed and similar entries made. 



*Relative references forward (RELAT>0) will not be executed properly 

/""'• in the CREATE AND EXECUTE mode. 



. = ^^i*0ife«K''J 
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Writing KOP, onto TajXi-COP 17) 



Purpose „-< 

OP fJ.jJnJEf tw a, &OP, w4£h aaspciated^ fflte^er ?^ ; ^ecj^n^^ametep , 
onto a simulated tape. ,,, 

Operation 

The . .uaej^Sj ^^ fc o SIM^ijEy the number of |h|t ^j Q t£e. line .number 
of the f^LraA OP in the new KQg, and t^e , line. number, of the Jast OP which 
iatp/bs,. included*. n . ^ ( , ■-,...,,; .,-. M , . ,, ..-f : -. 

If the first line number is not specified, the number 01 is aufib.- 
matically assigned; if the ending line n.umber^ is not sjpecif^ed, it is 
assigned at execution time and will be the line number of the OP immed- 
iately preceding the OP 17 being executed. • 



3 3.0: 

aloe- 



Once the beginning, .a^} ^ndj-ng^ lines pf th^^OP ^y*t^ as^weU as it a o 
number N, have been determined, OP 17 deletes frqm..fihe .disk -f^le any 
file .TAPR. »*-; It thenrW^ites 5 quftnt^iti^s r onto, ^JAjEJE. N: 

1. The number of OP' a Which %ar»<«o hi* Included ;iQ,jfihfti>tMM ICDP. 

2. ^-THe" number' of itee^et^THseamatttra «a«ociot»da«jttte th^ O^t'srbBing 
v , , iac^ud^4n : .t;he. ; KpP 1% .,... . . -,- .;,,..,,, ....■ r .., :,-.,..-. 

^ Th£ humbar of floating point paraowfcers associated with the 
OPs being ^eluded in, the KOP,, L „ ....»-,,..-. 

4. * The- intiegfer pointer of the first OP of the iSewOCOPr i 

5. The floating point pointer of the first OP of the new KOP. 

These five quantities are used when the KOP is r£ad back into the 

'-"<-■-'■ - : ' y] ■■ i''" ;: -•'-■"; > i : ' a.-!.T ,0'i -• 'f:; ;ru , r-u: 1r-T' o f > ; ;j ■■.<.■?■'_■:, -..', ■■','. 

computer by OP 18. ;. 

After these five quantities, the array of OP'fe and pointers in the KOP, 
the integer parameters, and the floating point parameters are written. 
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Use of OP 17 

When OP 17 is entered, it types out the request: WRITE KOP XXX, 
LINE XX TO LINE XX. It expects input in the form XXX XX XX. The KOP 
number must be specified; if the two line numbers are omitted they will 
be assigned as outlined above. If you are in the create mode, the reas- 
signed numbers will be stored in the IPR list. The KOP and its asso- 
ciated parameters are then written on a simulated tape XXX, with the 
creation of a file .TAPE. XXX. 



>y»^,»«><^5sajBH!S!3»»^ 
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Reading KOP from Tape (OP 18) 



U'i 98 « 



** i i r.- 



Purpose 



iO'A .^'!T . X :. •-,>■ '■-'••"■■' r.i • ■■ :-.,:j .ni Jwciii eJssqxs :.'! .XX 3HT,: OT XX ,iX' T JJ 

ifi'* ^oji" js.uxnii «j^l- std';ai:.;o an] > c«j aril "II ; ball i.iaq<j rtd je;^ rsomun 

OP 18 reads the KOP back into the computer. It asks for, the number 

- *•: *5.~.> i 9fi.t - 9 bora s;:3u s/ia «t 9is ijov_ 51 ,$vous oanllji/o 8~, DsTrplaen so 
of the KOP, for the line on which the KOP is to fcc.reag in. and for the 

first line of execution. If no line number is given, the program assumes, 

the KOP is to be read in starting with line 1. 

.XXX .MAT. sli'I t; ~'o no;i;,rn 

During the reading-in operation, OP 18 re-assigns the pointers of the 
KOP being read in, and adds the numbers of the IPR and DPR lists in their 
proper places. 

If an attempt is made to read a KOP in from tape and the first line 
number is not 1, there must be an OP, with pointers, in the preceding line. 
If there is not, OP 18 will not know where to put the new members of the 
IPR and DPR lists. 

Use of OP 18 

OP 18 types out 

READ KOP XXX, STARTING WITH LINE XX, EXECUTION STARTS ON LINE XX 
It expects input in the form XXX XX XX. The starting line indicates the 
line on which the first OP of the KOP is to be placed, with the others 
following sequentially. If no starting line is specified, line 1 is 
assumed; if no execution-start line is specified, line 2 is assumed. 

The OP computes, with the first five numbers on tape, the new values 
of the pointers of the KOP being read. It then assigns those new pointers 
and updates LKOP, LIPR and LDPR. 

If in mode 4 or 5, execution will begin at line XX of the KOP being 
read in. For example, if XXX XX XX were specified as 100 20 05, the KOP 
100 would be read in. The first OP would be placed in line 20, the second 
in line 21, etc., of the KOP list. If in mode 4 or 5, execution would 
continue with line 5 (line 24 of the KOP list) of the KOP which had just 
been read in. 
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END OP (OP 19) 

Purpose 

The purpose of the operator is to provide an automatic termination 
for KOP's. It also provides a simple way of exiting from the OPS system 
back to CTSS. 

Operation 

1. No parameters. 

2. If mode = 1, EXIT will be called. 

3. If mode is 2, A or 5, prints out "END OF KOP" and sets JKOP=0. 

4. If mode is 3 or 9 OP is not executed. 



This empty page was substituted for a 
blank page in the original document. 
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Chapter IV 



This empty page was substituted for a 
blank page in the original document. 
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CTSS OPERATORS 

by 

David Ness 



In building up a system from the standard OPS base, the user programs 
new operators and modifies old ones. He may also want to alter his mip ' - 
of common it&ragi, and perform 6th«r activities ritirmiily Wtfehirt the 
jurisdiction of the time-sharing i^irvtiorv 1 - m J -"<?-'--- --'< '^ --'-" 

For some purposes, it is convenient to be able to do these things 

noi is,',-. 
as though by operators of the user's system; that is, without returning" 

control to CTSS. The following set of operators gives the user this 

vr.^r-yo') t j': a;\ ■ wW /"'.." v ,,''•>;■- z<rx;bo 3BT3 axii 3 :3:ji :■;«-:.;..-, no.o Jj .:■ 
ability for any CTSS command. These operators were programmed before the 

v j j /.3i .Ui,».o.;.j£ ToJB'jy^o «■:.: ,ijfr.-;;i<3? :'uqni j.'ft io on'* *$di }■•; bfiuor>x~- 
RUNCOM command of CTSS was available. 

not Jdliynxr, iiiiz ! • ':\\.ix idi lo noi'lB; '•o.'^v.. : ; j - s ot ^J ■ 

■■'■' '■ ■■' ; ' -■ .'•■:;■■ ■■ ■:'>.' ;--;.[ Jj;f!.;o. -j ^;1 ' . ■ .■ ;>.->, ••■:■-.■..■ a^j'it , ; : 



*j .""■JilVV 



iV iOliilj-;.; -3 3 ' 
■in 1 1 abrn; J;i0:: 1 -. 



■r. 



.^^j^;;:^*. 
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OP96: Input and Compile 



Purpose 

Inputs a file and compiles it into machine code. The sequence is 
automatic. 

Parameter :.■• ,--, : l ./ ,? < ■ A'. ,.;jno f. j . ^y^ibon but. .> -uc- -o^. 

Two integer, (actually §qD) s parametgrf; rtJ j;h^- : c^8 gf^the^npul; ^Je ; 
and the name of the input file (in tha^ oj4f r ^ x ; - ' 5 -nj in - ; , :o; I m 

Operation 

OP96 obtains its parameters either from the console or from the IPR 

.3.;:'' - ■ ■■. -'J a-.vii ^,-io. •• ■'*•■•.!<, ■ t. .-'-:• j»m -oi loi 3ifT . i": : .V."D uJ .;'.*.■ t 're- 
list. It then executes the CTSS command, INPUT. When the FILE command 

•:■;". ■."''•-■"■;■• : r .w.c. r : . ■ rtc risw i-v.i.^';yqo 93SffT . bn ammo 3 3STD vm*. •toi v .3 .r I. j '. F [ 
is executed at the end of the input sequence, the operator automatically 

■ sIoEliavB aew 2STD 3o bntiiruno-.- iWi' i; 
calls for the compilation of the file. If the compilation is successful, 

extra files created by the compilation are automatically deleted. 



Guide Lines 

INPUT: CLASS NAME. When this information is received, INPUT YOUR FILE 
is typed. 

Note 

If we supply the operator with parameters MADTRN X, for example, 
and then file our input under the name Y MADTRN, the routine will compile 
the X MADTRN file. 



4.25 8/27/64 



OP97: Edit and Compile 



Purpose 

Edits a file and compiles it into machine code. 

Parameters and Operation 

Exactly as in OP96 except that an existing file is edited, rather 
than a new file created. 

Guide Lines 

EDIT: CLASS NAME 

Note 

See the note to OP96. 



1--rfci^*^St^iM 



as* ^^4wk$Bih? -" *- *-M# '^^^^WB-Bi? 
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OP99: System Load 



t-H 



Purpose 

Loads new operators, etc., without leaving OPS. 



Parameters 



Variable number of integer (actually BCD) parameters:-- 
are the BCD names of the files to be loaded. ! 



rameters 



Operation 

Loads COMMAP, SYS, ALLOP and any other files indicated as parameters; 
The sequence is as follows: 

1. Get names of files other than COMMAP, SYS, and ALLOP from the 
console or from the IPR 

2. CTEST4 CCfMAP SYS ALLOP and the indicated files ' 

3. START (i.e. execute a START command). 



iJOK 



Guide Lines 

TYPE NAMES OF OP'S. User types a line of BSS file names. For 
example typing the line "OP92 ABC 0P91 XYS" would cause COMMAP, SYS, 
ALLOP, OP92, ABC, 0P91 and XYS to be loaded. 



Note 

This operator, when executed, destroys the common area. We will 
later describe a pair of operators which can be used to save and restore 
common. 



■■:-»\;:?i*^&#&&%?? 
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OF93: Define Own Common 



Purpose 

Eliminates the necessity of the user's constantly modifying his CGMMAP. 



Parameters and Mode * ----— — - 

OP93 is executed regardless of mode and thus it does not change the 
IPR in any way. 



Operation 

Allows the user to extend his common map. It does this by creating 
a file called OWNCOM FAP which is the map of the user's own common area 
(i.e. his extension to system common). ' ~' 

Guide Lines 

CREATE COMMON: NAME, I, J, K CR / CR. User types an arbitrary number 
of input lines of the form: ABC, I, J, K where ABC is the name to be assigned 
to the common array and I,J,K are the dimension (explicity zeros for unused 
indicies). When all of user common has been entered an extra carriage 
return terminates the operation of this operator. 

Example 

To add an array A(27,3,4) and two single cells X and Y to common 

(in that order) we would type: 

A,26,3,4 
X, 0,0,0 
Y, 0,0,0 
(carriage return) 

Note 

When OP93 is executed a new definition of user common is made. 
Nothing of previous definitions (except system common) remains. OP89 
can be used to extend common by adding to the current OWNCOM file. 
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OP89: Extend Own Common 

Purpose 

Extends (not recreates) OWNCOM FAP. 

Parameters and Mode 

OP89 has no parameters and it operates regardless of mode. 

Operation 

Equivalent to OP93 except that current definitions of common are 
extended, not begun again. 

Guide Lines 

EXTEND COMMON: NAME,I,J,K CR / CR. User input is same as in OP93. 
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OF92: Incorporate Own Common 



Purpose 

Incorporates a common n»p'"wrItten*Dy"'oiHfo^ 
version of COMMAP with the user's own common). 

Parameters and Mode 

0P92 has no ^raMteri^iM'oi^raiea'cilfc^oWJ)"'^^^***^^'^*:' 



Operation 

Assembles the file CO&ft*P FAP'with O^M^lip 5 J,ncorpoiited^ delet^W 
the SYMTB file created "ana 1 'refeuras^contior £o"OPfc: It doi^not'aufcomatk- 

. r;<> i :;jj''!:?r, 

cally load the new version. 

Guide Lines : ~-~- 

FAP 1 InMED TO J6fiFINt 4] fcbM^ti; There Is ' no 1 user input . - 



fij;-.'i'!jOO 



Note 

If OP92 is executed with no O 



If OP92 is executed with no OWNOOM FAP present, it first creates a ^1^ 



blank OWNCOM. 



: : v .:.':<": 



.t ! :. <W,:i <IJ :.'*'" <'■">'* l- 



^^^jjg&lsg^ 
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OP98: Combine BSS Files 



Purpose 

Combines any BSS files (used r t;o,cr eat ^ALLOP;). n , 

Parameters 

Variable number of integer (actually BCD) parameters. Tb.ese para- 
meters are the BCD names of the files, to be combined. 

Operation 

Reguef t a the name of t:he combed, f i^and^ Qf*jj$$~ s; 9 f , f h f f ** e8 „ *° b * 
combined, in$:o this file. It ^fffHf.*!^**!*,^*^."^!*"/.^? 8 
COMBIN operation. 

Guide Lines 

ENTER NEWNAME THEN .ALL TO ; . BE CO^INED^ l^yjJfFf § , |h,e n£W : n«m«, .and 
the names of all files to be combined under that name. 

Example , . . T/ .. ., v ...:, n ., - + , 

To add the files OP27 BSS and SUBR BSS to our present ALLOP we wou^d 
type "ALLOP ALLOP OP27 SUBR" which would combine under the name ALLOP the 
files ALLOP (the old one) OP27 and SUBR. 

Note 

This OP can only be used with BSS files. 
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0P91: CfSS Command' 



•saot|Tir£ 



Allows access within OPS to any CT^S command. ' ' *' S! ! " ° 



'J J 2 'JiJifcTS : 



Parameters 

Variable number "of integer Actual ty' 'B^plrasleterW ^iacfi^ifa- ' iV 

;noi ■'!)■) s J jT- : _"'u.)il_ wfiiJoflsU i-ia.-i'iJi-ii "iyol ,$n:sn srv; -.-.if! >''~<>LiO i;i" 
meter is a single word of a CTSS command (in sequence;. 

. Cvola-J bynisloxs) JJi:,: !J cvr' 3-jj-.;<>h -u> k -r ;>,?;.■* 3 s. r J 

Operation 

Reads in one line of information which it expects to be a CTSS I'LL 112.^ 
operator. It then executes this operator. 

Guide Line 8 

CTSS LInI. User types' one line or^tnpui^ln the'i&rmal 1 CT*S fasnion!"" - 

Example 

If we were to type : RENAME OP27 MADTRN OP28 MADTRM" we would exee^e -^i- 

the rename command without leaving OPS. 

')'Ai : VL! Ii'-tVT ^qvl no.!; .-J . >->> Jfin-r:;- -ri.rs-l s.jji .jot* -'0>a.";..v. ■?;;? io .Joier 



o 



.'■' v>.(;..; : ; (C..- . 'i,i-i .-;;•;■; :^f) ,.J" 3ff;y j^'jf'Jii ;' <>fj 

vrij-j-iz z':.:: ic nfji 'iv jc.: :-iV- :-..■):- 1 r .-■' : - :;sL- 



:*.':. . :VX> i 
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its.;; 



OP95: Write Common Area^Qn Disk 



Purpose 

Allows the user to write any part of the commpn area into a file. 

Parameters 

Nine intgger (one of which is actually BCD) parameters. They are * 
(In order) one BCD name, four integers denoting "from" cell and four 
integers denoting "to" cell (explained below). 

Operation , , . . o J; .,,.,..., ^._ .. fi ,. c . , k- ^j .•,.,,... rh .,- 

Reads a name (e.g. MAY20) and creates a file(named MAY20 COMMON) 
which contains all of the cells from the cell denoted by the first set 
of parameters to the cell denoted by the second set of parameters. Cells 
are referenced a* diffussed in "Adfres-l^ Commo^ Storage", ^ (see p. ) 
above. This file will be available for reading by OP94. 



Guide Lines v . .... ,. .. G 

FILE NAME OF COMMON. User types one word which will become the 

. cuO gfiivsai JuorUiw oneyfi'ta s;-^ :.■■; ;■: 

name of the common area file being created. It then types TYPE IN BEG 
L,I,J,K, OR ALL and waits for the line number and (i,J,k) of any array to 
be entered. This is a reference to the cell from which it is desired to 
begin writing. One may also type the message ALL at this point and the 
operator will automatically write out all of present common. If one does 
not select the ALL option the routine types out TYPE IN END L,I,J,K and 
waits for line number and i,j,k of the ending cell to be entered. It then 
determines the location of this section of common and writes it into a file. 

Note 

See note following description of 0P94 for further comment on 
OP's 94 and 95. 



"f" 
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■-.jV,. ;-/.v'[* w Ht , sv;. 3iii ! c3 T J,T e^nil; nomram snsjgva io I;o 

Purpose ( ' jrii,i - H,: - <'^ /J ° *' 1 " 1 " 1 0Se ^ - m ' 

Reads a file wriitaa»fey an OP95. \ i 

(-•.Vrrf-.Br,) .^i.Ltl.J (lift ,11 37YT 

Parameters 

{ -_j a 2 i * j r*f a i 

One integer (actually' BCD) parameter. This parameter is the name of the 
common area file desired, ze, IvioM^a ?j bssi.*j;{9 30c i in : *_,i ynA 

Operation 

Reads indication from the file referenced as to where to begin 
writing. It then reads the rest of the file into this segment. 

Guide Lines 

NAME OF COMMON FILE DESIRED and user types the name of a COJMON 
(class name) file. It then types RETRIEVING THE COMfON AREA and proceeds 
to obtain the file. 

Notes on OP94 and OP95 

1. OP95 writes indication (beginning location and number of words) 
of the source of the information at the beginning of the file 
and then writes the information. Thus OP94 can retrieve the 
information without knowing where to put it, because this infor- 
mation is at the beginning of the file. 

2. If common is changed (by extending it, for example) the file 
will be read into the correct positions so long as no change 
has occurred within the part which was written into the file. 
This should be made clear by the examples which end this chapter. 

3. In writing out an array, one cannot write out just one index 
(for two or three dimensions). OP95 writes out a sequence of 
registers. Writing from KOP(l,l) to KOP(5,3) writes out (I.J.), 
(1,2), (1,3) ... (5,2), (5,3). 



4.66 8/27/64 

4. Parameters are input as in the following example. To write out 
all of system common (lines 1,1,1 to line 14,30) we would type 
as follows: 

TYPE IN BEG L,I,J,K OR ALL (machine) 

111 (user) 

TYPE IN END L,I,J,K (machine) 

14 30 (user) 

Any i,j, or k not entered is regarded as zero. 
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OP90: Print Common Fijle 



Purpose ' j - ■ f iO-J3;v •.,;■:•• ,.•..;. ri. r : ■■■■■!--, -:«■';• 



UC'JM'.yj Tj-v, -■ ; v ... -r(T 
viiJf;.'.' ' i ■".■■ ': p .* ; <-■ .; 'i'i 



;p:'i J ft "J . fcir 



.3.JOOf: 



Parameters 

One Integer (actually BCD) parameter. It is the name of the file 
to be printed. 

Operation 

Prints the common file indicated by the name mentioned. The file is 
printed in reverse order (i.e. in the actual order of instructions in the 
machine, since the common area is stored in reverse). The first five 
words of the file are the L,I,J,K of the ending location and the number of 
words in the file. 

Guide Lines 

FILE TO BE PRINTED. User types the name of the common area file 
which he desires. It then types out "BCD OCTAL DECIMAL FLOATING POINT" 
and proceeds to print out the bed, octal, decimal and floating point 
equivalents of the word. (Under BCD any illegal character is printed 
as *) . The routine automatically suppresses the printing of zeros, but 
it counts them and prints out the message "ZEROS: XX" (where XX is the 
number of zeros suppressed) . 

An Example of a KQP 

To add A(5) to our common area without changing anything else the 

following sequence may be executed: 

OP89 (Extend Own Common) 
A,5,0,0 

OP92 (Incorporate Own Common) 

OP95 (Write Common Area File) 

TEMP (Name of^file) 

ALL (Parameters of Common) 
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OP99 (System Load) 

OP94 (Read Common Area File) 

0P91 (CTSS Command) 

DELETE TEMP COMMON 

This first extends common, then incorporates this extension. Then 
we save the common area, reload the system, reload the common area and then 
finally delete the temporary file. 



5.00 



Chapter V 
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OPTRAN 
by 
James Linderaafi 



if '■ 



?be OPS aystem simultanaously yrovtdes ,* jMrtd a«i » facility for «n 
on-line algebraic programming langaage, 16 piMsviidka * «ge4 Jtor »lgeJaE*ic 
•mKBi^ulafciao'-'of/M^ te*tf»tion b* cofleurrxmtr 

with programming. It provides a facility for rec<bedi«goa jwognem *a#i* 
is written and for re-executing the program, or anjy j»art o^ it , a$. will. 

OPTRAN is an algebraic language s^i^rtjoj^TRAN,, which gives the 
user the option of executing as he is programming. r OPTRAN.is, embedded in 

the ^ES::ayafcemi;aH|d*«»:-pa:adB*ed'^iB,>l«a« tefcam^nfeearm r<6& infteafoilttent work. 
For this reason many desirable -*•**&« ^Ttfl'iJI lef t ! f i or Jp flter addi- 
tion, and emphasis was placed oa;*.(»«*kia^yf«a^-te^w»«s-i»erston. 



r. ..:'i 1 •- 



"■;' S(iT ■""'■''"} 1 c- i: 
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Description of the Language 

Although OPTRAN might easily include statements of every type pro- 
vided by FORTRAN (substitution^ „^o^^io|§|. transfer, and iteration) the 
initial version has only substitution or algebraic replacement statements. 
The decision to postpone coding of the other types was based partially 
on the exist c*nc« ©*cwdfte«bt« loop and traosfie* OP't to the 0*6 system it- 
»«lf. ?A ldbiie«<S voea*«l*cy of dimensioning* elaaTing, >i»d ^tinting state- 
xmtma mtso are provided b*fc mod#frd«cia*Mtt*oiiaie^sd^ 
Statement* are omitted. .„;,U:ii B J fi a^b.r/^s ^ .^ji;:^:^ :^ ■■:-■:■.■ 

" The replacement statement is ^ of the ^lorm J a - b wfth the following meaning: 

1. a is the variable to be replaced, 

2. b is "an algebraic e«pr«issionV conlisting of ooe or more vairi- 
ables and/or conataats eomieoteo-te^imeanAftgfui. algebraic 

_. .sequence, by standard ,«?i^W|^ c 9 ?lf^t^9i: 8 5, :S{ ,T , ,-■-, - *■<:-:■ 

+ imary enf bt«arys()aiditian)i *>■>■"'***». >sv - r?/:dqm... 

unary (negation) or binary (subtraction) 

* multiplication 

** exponentiation 

/ division 

' (apostrophe) a convention for taking absolute value of 
the expression following 

3. The variables in the replacement statement may be of either 
integer or floating point mode, and may be subscripted by 
using the usual parenthesis convention. AMY arithmetic 
expression may be used as a subscript expression. Parentheses 
also may be used in the same way as in ordinary algebra to 
specify the order of the computation, and standard FORTRAN 
hierarchy is observed for operators in an unparenthesized 
expression. \ 

4. For the time being, variables may have only one subscript. 
To accomodate double or multiple subscripts the programmer 
must reduce the multiple subscripts to a single subscript 
by computing the appropriate algebraic function of the mul- 
tiple subscripts. For example in the two dimensional case, 
ARRAY (I, J), is replaced by ARRAY((I-1)*JMAX + J) where JMAX 
Is maximum value of the J subscript. 



^tgS^^^-i^sssrss* >-(•*—» v-? 3 "* - ~ * =. i. ^*r*w 



\ 
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var 



To provide compatibility with the OPS system, all of the COJfliONaaji. 
appropriately locate^ ^^l^l,* 10 ^^^^^ ^»ofM°?fl5 d o^ ft t^H ional 

has been retained. 
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To dimejjsj,on arrays, t;he statement 

'•-■.;'• '.-••■ i ,,.ti?; g^iJfii*.: «■ :: ':•:, - ■'..• :?rT :ao 

v. DJIMHISiOife AH8A¥14lSIZM7'»ASlAY|4I«aE2> , rr C \ jqaK|*In< ifllHlft? 

may be used. Both fixed and floating point arrays may be dimensioned in 
this way, but Cie 8*S6oU'lARR4¥I masgn«ototetre^oo«atfs«4 ptiHOuMl*, and 
the^ariaMaajlSIZIiJaMiiaBe^ OR, 

unlike ilQimkN^ipravdmialyidafii^ 
c unseat var4aiblsee.aare8oead»'.iol 000? o;." byhhajxs nsaci <.s>d .waaio-ia aommoD 

' ' ^eSomiS t&AR Heirs ou£ Hi s^ll^a^r^e^^OP&K^nd^ 3 
thereby makes their values inaccessible. It does HOT* 'cfear S $he 3 ©mMn 
var/iafelata pfi^tflie JaBSodyataiB. The 'SOatiaweifc aJaia^oj "noi?eI iqcou" 

causes the printing, one to a line, of the n variables VARi, in fixed or 
flo*tfrf| te>de\ ff a Vym^dl'fs W£HM!°£ tint to ^s ^f ect is printed. 
NO ^l|Bfie»pm A8£ ALMWS1 aa yet t ,Hlii« is a t*«^oracy *««;r4ctiot>, and may 
require you to self a^uWs^c,^^ subscripted 

variable, t«siag thar replacement ataOaaen^ JbvfDrtt^iriat^^U: ^-irrKi 

; Symbol liy-' be 'if^W c^raWerWn YengWf all are r ^iT 
adjusted with preceding blanks as in CTSS, but not as in FORTRA¥. B8 ¥ys&ols 
with morajrthan A^hwcaffiEare- vtikhiM etaaiaafcetfjiaawiagn aa%Jaa*B<steTininal 

' &■ c^r^M?fcaj»»i:ir^anJw, aare avervwfcare iig«pa«*^ritctb»^«t*ft»/>ofB\noi jlmI -;.-: 

■ ' ^tm^d^dii%n^fcV=ar¥-giv%n^ W^^uJP£ i ^^£&tf\i ' 
returtifedto irhe- oft? aystem W&& 1 %WWM%S^^tI i0 WTfJ n re^ 
coverable cases control is returned to OPTRAN itself for corrective action. 



)i &■■'■.&* -?X?ri : .M"%Jz\ 
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Use ' .., -x '.:.-. -:.jy 

OPTfiAN la initiated" to 
tliiues to call OP20 Itself'^" unWl"a' ! carriag^ OPS. 

Al 1 relevant arrays'", not 4b ly ItOP and IPR^ are continually updated 'so that 
a single call to bP20 In modi 2 or 3 may result In^many occurences of 0P20 
in the KOP list. ; r :j-x >d , 

OP20 invites a statement from the user by printing ; tfpfi. The user 
then has the option of s typing atL^ePTSAHi statemant, oBO§tvIiig<- ! a carriage 
return to restore control to the OPS system, 

...,_-■ Any 3PTRAN statement referring to KSPpIPl* c-BHU JfPR^JDPR^ 1X0P, 
WPRi; iaiR» MOBE, fflSfljIii. JK6P, HOP, INBBX or ISAT will actually address 
these common local ions »• auh|ect ; afto s the reifcfcict ionof rone ia^sl6£ipfe only . 
Common storage has been extended to 5000 locations joand ^symbol* other Chan 
the standard. CCMMON symbols .given above are added t^to c^ommon^st.cjrage as 
they are specified., 

"Compilation" consists of camsfcruction of a Polish list, usually 
about 3 to 15 elements long. This ,1, 1st is stored , in models ,2 and 3 in the 
IPR list, with the addition of either 

1. a blank word (OCT 606060606060) to indicate end of ^Ijtst^ .or,. , 

..-. 2. . an integer count of s«he element* far &m&MC&&- E^(13a8fc)V ; 
the actual element a followi^^ |PR(I4P^1), 3 , , c 

0PTRAN makes no distinction between modes -M ;.a& 3M '• to «4ther o# these 
modes, the IPR array is used for the Pplt^b, llf t a^J .r^cpjjp^tjjpn, is un- 
necessary. 

In execution modes, the Polish list $a proc*e«ed and printing or sub- 
stitution/modification of storage is effected, v-StsKfe<tiHBllBUMI^«t> NOT 
A REPEATABLE OPERATION, repet it ions of a r dii%e^sipji, i^at^^t du|^ng a com- 
pound execution result In no operations affer j£ha ; f irat, occurrence^ 
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Diagnostics, «>djMMflM^-r:?l ^ .^. _Z L J^^LS^. - : .L:ii!i^.^i^S 

input (always fffckMjedysd&a* ^«^»it^^^5^* .^^jj-l^^t * c . ,, iia3 

:, w •■.; lo'ESSEb - -■.■-■' , i / f.'v'; f/S.ni 3 .•,''?>■-..; irj H<:oi:?sn.MfiTOO i.r:9i& :: l i.r.; . J 

dimensioning; • ^^^si^av -wws i^ta'iMb 

'XKXXXX* DIMENSIONED AT atmaBte* itswjibzz iuciswcil?. 

replacement st# » «PW*lt coq»il»UQP ^oiafeoo^Bxb .Un^.i^A 

MISPIACED LEFT PAREHTHESIS 

• ^, >x, i , ;-j i f <1 n-sria isri^oj :5ieJD£'x£;i-j *>boro-2asu^ni instil Hi . A 
MISPLACED RIGHT PAREHTHESIS 

THE SYMBOL xW^fSfU&fi* 3 *^^ - ftjoi J>tb .->?-. n )*,,.,^.-* 



PUSH. CALLED TOO MAIK TIMES .oj \ ; t t *j 



printing 



XXXXXX * O.mmnim&fnn (if XXXX8X is floating point mode) 

: •:»:)'j ; ■> a ?.r.Qx3&s'$?ii!, ai dgxtg^.b 112:18 3ud UusllliCI 

XXXXXX » nnnnnnnn <i£ IXXXXX is integer mode) 






.!■ 



r r y^'!^^ , Tis^^^jp-y^f^ i ^y^^'^ 11 ^^^^^^^ 
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Possible Extensions and Revisions of the OP T PAW ^JJIfflP^ br:r ' H r ""'' : " ;;y '"' "' 

Easy alttf^lc^^ : Vm%s>^tftsa7 ^MtasHlWllidiK***'-- ! "•«*'"- 

1. Different combinations of predefined symbols t<*3§4tfos»date 
different common variables. ■.i-inuie.n^ni :• 

2. Alterations to the atHPf&^yfr&ft ^fl»,^faaV*SJl»a maximal 
allowable statement lejgyfcfchf, "A a;-lM0J2H3Hia *XXXXXX ! 

3. Additional diagnostics 6*ye*s«16^<*ftii«#f t? • !;MS): ' h : 9 ' 

4. Different integer -mode characters (other than i, J,k,l,m,n). 

SIBSKT'SHAI THODI CIHOAJ'IBIF 

Somewhat more difficult alterat%n^ r %|f|^: x j 0i !MY2 sht 

1. Additional operations, i.#H-^xie%»*if^ x thW^arae4¥ set beyond 

(*»+»/> etc.). iv'.'.'.'IT YV\m OCT U>uIJ7D .]>2U ,: f 

2. Multiple subscripting. a tai j 

• ■<-;■: J- .-;"-.) ;,n:± ii,::i*) a.r XXXXXX 1 x j nii-hlrm adrift . - XXXXXX 

Difficult but still desirable alterations include: 

< '•'•■..-. - r:, -j9Ja.r el XXXKXX : ti) rrnn/irxsmp - XXX XXX 

1. Incorporating loop and tyjaja^fr^^ra^iofoa, i^^gTRAN. 

2. Simultaneous maintenance of a parallel FORTRAN file for 
creation of a standard FORTRAN program. 
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Conclusion 

OPTRAN provides the OPS system with an on-line facility for pro- 
gramming with simultaneous execution and immediate diagnostics. One 
interesting application is the creation of new operators. After being 
debugged using OPTRAN, a new operator can be added to the OPS system as a 
KOP. The introduction of a mechanism to produce a parallel FORTRAN file 
on the disc would also allow the operator to be added to the system as a 
standard OP, if this were more desirable. 
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OPSIM 



liv'd MIH^i <j:f\ 



Introduction 



by ' 

foifSa 3ib -^ •fsqrao:.: o3 ■ 1 -j.-j'-v ■.■'■ . i-.Jv -.vis-H 



Current general purpose simulation languages sucti as ^Kfi^IP^?, 6PSS, 
and DYNAMO have made it markedly easier to build complex sfmuia^ion moa'eii;; 
Although these languages were not designed for use in a ^feimew shared qcomr i 
puter, suitable modifications can make them compattafcle yighsa eimetshariag 
system. DYNAMO and GPSS have alreadyrab«a«amodifiedaiitssuchra manner, but 
as yet these systems do not take fu4»§aava*eageiofi6lme*ehai!ingipossibil*ties. 

Specif icaUy^.^ogrammer.^te^clii^^b fb^modj} *FHf±W8S u S4?9at{!mJta aril 
very limited. , r . ^ 

T>e advauta^e^pf^ogjamme^ 

capability .permi^s^^iUAer, $P^£.?4FSf ;?^ng e 9M^^^ ic 

while, the .mode* ,i... ruan^ng, no Of. r eye^graaf^ f£gn£f^ace Ifct^^gtjha^ 1(J0 
the programmer^ ca^buiy h^mo^on-^na a^teat^he y|r^ous B parkas ^ 

they are introduced. .m^^nm^P^m^miiim^^h^f^^MEi^SS sllzasvo 
grammer to consider detailed aspects of his model at a time when he is most 

.)i .'.- --'OS!- ■ 'yjuoxinam ^ ! J0 ari"7 Jo J. la ihstso'io Ulyus -jsaii sdj ristrodJlA 
aware of the problems involved, rather than forcing him to deal with the 

-^ .; q-jU ;; •-< 70 r ti' , Mia^u io „-, , ; !0 ssoq-jou leiosqg Blad^sp •JxiliSy od 'isiaas si. 
model in toto when many of the same details are rattier obscured by the 

. .. . i'^il HI.^Q 3i(J-wpfio-t adz vrf badiioaab 3d hfuo:; Inzv-i brrsmsb at!; 

complexities of the model. 

Although it is possible to modify current simulation languages to 

,„..,. . K^C a j bneaah -.r!3 io/juisv srfa svoos oi - yiTO 

make them interactive, it appears more promising to incorporate the 

functions provided by these^ng^^ %> an ex#|J^|$ M -l|ne control system 

such as 0PS-1. The following presents a method for accomplishing this end, 

the OPSIM system. ' ■ 

Welsh, R. L., The Development of an On-Line Computet 






... j, "**,^3»3 .. H^=« ^*- ^S^p^jf*^ 
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The OPSIM System 

As an example of how one builds a simulation model with OPSIM, con- 

/c 2 

sider the model of an order-up inventory problem described by Galliher. 

Here the object is to compare the eiffec^ 6i different "order to" levels 

on inventory level, given that the ordering is done once a week and that 

the lead time is constant at one week. 

A way of thinking about this problem. is the following; Four distinct 
events can be Recognized: 

1. place an order ■■■ .. ... ,;.;:,,: 

2; draw a weekly demand ... - * • ,•>,■■. s&ji 

3. : report the status of • then.syatamvbfrriJ i- y *--i 

4; record the arrival of prderedgoedl- ^ - 

The simulation consists of iterating through this series of events, ad- 
vancing time one week on each cycle. 

The segregation 6f - ^ttiiiie ■' e^ebcti - iii ' ; SUti 1 a&dWII^yrikatalJlr ^iiugiliiiMrii^tli* use 
of an OP to 'dlsscribe each e>ent and 'the^su&iifUnt- cSiBiM^ibn 8f tihise 
OP' s Into" a KDP, the exeCttfcioti^bf which 5 wooIa 9 be G one<*ciei* ! of ' the simula- 
tion. Those variables used by more than one 1 ©Flatten ia^ftviftfcoff Ifcval, 
quantity oh brder,6t c. ) are l&intainet^BoiBM^torilge. 

Although the user could program all of the OPs mentioned above, it 
is easier to utilize certain special purpose OP's of OPSIM. For example 
the demand event could be described by the following OPSIM OP's: 

OP47 - to obtain random demand from a distribution of demands 

" ' c.i : ' '■ " ~ 7 - in' f 7 7^ ! * VT Ji * ; '7 7 : }i7,0" : oi 7*<'1777- '* 7 * ; ■ ; 7*- -^ ' - 

0P16 - to move the value of the demand to 0PJ1 

■-•'-"■. • :.■ ji ' ■''- \: x;\ t';z>~,<\ 3'io:;f sisaaqc "u ,•-.-'; ■ ■ '-> <■'■ '-'■ ■■ ■ 

0P51 - to perform the remaining functions necessary to complete 
• ' the description of tni'' dyii^«v4ntV'*' j1 '<' 

;■-■■'' : ' 7 '■■■'. ; 7'7. '-'i 5 "-"''A rnh:^-;!? b K 3 n -3 ;■;'";"! .;-'.; ^ni."/-. 1 t. . ';. » 7: ' ■: .-,.•. 

OPSIM special purpose OP's can also be used to simplify the accumulation 
of the desired outputs of the simulation. 



2 Galliher, H. P., "Simulation of Random^ " Processes" 4 , ftofee* oh - 
Operations Research 1959 , assembled by the 0. R. Center, M.I.T., p. 231-250. 
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Thus, when the user has the appropriate dp"' a i for* tiia S$m%iati6h7 ri ne 
begins building his model by creating the (O^iM ' «rafcrM' r sys4Je»T 'a tifl*' :W r " 
which coordinates the execution of this evciit 6#^s & . %fe ureni contVoi i J s 
generally composed o?bp V s fr^W ltf ftf/ 3 '{^$rAfiP "*ny '*& ^ " 
terminate by branching to the control system^. "'"'liM^T^Worm^the 5 ma^oir* B M 
fuhctidtiri b*'"W*#c^hl*»t sywu»v *heff «xec*Jtad ^l&etocssfctei made./iit m : 
request* tH*t' fife p*tog f diMMl inp^t «he ttumteH»v«t!i^iB«av cafe t^d-£ixat ; ,:^o- 
execution o'f all etftAKP f«30P t«V awd us*s «h^^^cK«i*£ia» ttordLiKtttLailfeMb %ri:; ,.ic~ 
list of all Sch^uled flitur* <>tc««r«itea« (^ fth»4iev^ftt IfeQP 4 *^ .Ifeja^sojR, 
creat e s the* { *>F*»> -17 ' : **Sd iW ,-■ i <»*# *wr reading an* JnttttupcflOBfap aueetotafccja lafe^ 

After completing the (MP's concrot ayate^ s and* u execut^g di*40 irf "ttftP 1 "'""'" 
create "mode/ the user" creates' tne^lr at v av«^i^^ 1: ^p^ c a^^et^n 1 rn^ ' 3ri:! 
stores it on a simulated tape file, He tnen' creates ancf * stores' "l^fee^otna^'' '' 
event KOP's. To begin a simulation, the user executes OP40 in mode 5. 
OP40 will read in and begin the execution of the earliest scheduled event 
KOP, for only one KOP is in core at any time, the remainder residing on 
the disk. 

Because of the nature of the model under consideration, the events 
could have been listed on the same event KOP. Since in general the order 
of the occurrence of the events will not be fixed, such a simplification 
will not be possible. 
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To build a model In which the lead time is probablistic, the pro- 

' • ■ , ~ •''.• -.'■&..-■ ■'• ■ • /■•.v: •'■"■> j j J;.- ':!' r r< qqb -}fi3 flEii "aeu or'.l n\w;v -? :li 

grammer would remove the arrival QP from the event KOP and file it as a 
separate KpP, OPSIJl^QP's, 47 and 41 are added to the original event KOP 
to draw a lead -time from a distribution and to , cause an occurrence of the 

■'J ."■--'' '.;•■'» a P Jif'i'i" 1 »..-■•,? . ,-<i . u . liiA .4.; a IO !" ; "; D'JW'.-'.JaiO": "■' i .! >'■■ . 

arrival event at, the current time plus lea/l time. , ■ , - 

Similarly/ 1& tfee ordering ! trulft3(wr*T<iMjt» ctawtgftd feiDfSr&^ejftMw^ 1 *?* ; 
a week to order ing; ato a»i0^ear;ipai4n&^^^ r^pwed,, 

from th# evatifr KO?!iandi would rbe seste<*utied aoaly c&fc t&e* MPdejafcag, qqndition ^ 
were satf^MaaL OPSXM Ot*a -4ftaHd> 14* wauid. ** uae4 :tot4Mb5fWDmto J6PP $P 10 
teato i«or «tate a:<mdflUbi&'i iattAvto-ntf f?>«t»*he *«e»tftgb>n 83* tffap vord**; PP; ;i 
when required. In the .same manner, the programmer, utilize* the modularity 
of the QPS-1 system to describe other variations of the model, controlling 

the event sequencing: with the OPSIM OP's.. . a 

YoiTdo : r :• ,i9"fl8 Tmik i e> j s*.» 1 "■■ nan.: sh -r>i.i; set.' -.,9 ib.U;'- .... •, -, <.v- i 
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/us* 3j; Yf-' Ml o"'' ! .<_ -*- ■ ■■' -^ 
Conclusion * "* 

i L. i l j i ^^: r, ;n ,i i i I, 

The results of this research show that OPSIM is successful in 
building and testing simple matt63M4tfce~* tltf cifA 1tUMmfiH&m&l'> It now i0 
needs to be used on a 3 jC^ip^x,|.r i o|)^e %rfl Ifc^MW-fc t Hfii*fi*f r «W em tha ^e K 
is hardest to test using the current simulation language, and it is here 
where the on-line approach to building simulation models is expected to 
show its greatest advantage. 'svi-r:s ns 3s3f ■>•-■■■<--,■ Mirf-* <io j;m ^-:-'v 

OPSIM wilfl' b^l^^vftdt'lne^i^rat^a^ ^ ftrat , ^wiM i&omatical'ly 
incorporate improvements in the ^wer r ^ 1 c|«^ej!^c^w / &h I #t40b. OPSpJj.^o 
allows the programmer to control his model. Secondly, it will improve 
from the addition of new 0P 1 s which add more specialised simulation func- 
tions. Finally, it will iMpi b t t »»«%£ f r'Ort' tt^^ ' A» pto^aiHtftera : make use" 

of the <*#*#fil£4 B $& 8 :JJ , l$n& W&feM* ^fyn^io# 8 «f¥» r I$^*ff^ ***"iO i 
would pre|er [ fo J havfi i don£ & d4£f^^ 9 , ;i 

best way to organize such a system as this, and in many part J a a j$he,^esj: r , 9f { ; j „ ; 

way is dependent on the problem being solved. However, OPSIM is a start. 

It provides a general on-line system that can be used, experimented with, 

and extended. 
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OP's In the OPSIM System r 

OP4Q ; ..; th^mai^C^at^piJ. QP , for-;* tb*' ; jSyp&Mfcm ^Xqmla *n I :<■-.-> b-<:~> ;<fi.xbJind 
OP5<* '-'• ' *the'©Pwhm j d xl --' jBl ' ! °' ^ f ' 3: 

OP51 the OP which executes the operation caused by a demand 

OP52 the OP which executes an arrival .^c-jnBvbi, jj .;..-',: , j-< Ji voris" 

OP53 (/ , , the OPf which print s t^#t.a^-|#$J#8r r |>fb#v#ipfti.aMon; xw kjp.so 



OP4143 the^ttP'i^cfccauaeS' an *tfenP , *»P 



9(li ai 33nw.wp^q;'ir i/tBioi,.^! 



r:qr:u LXiw Ji . v . • rj<; .^ . l£»h-vfn «!>• ioilito^ o:f isfifnis";;:.;>'--aq ::>ri:t a wo !'i s 
OP47 the OP which makes a draw from a random distribution, 

.-:- /■ o i _; ii s i;i-i ■ u;:-:Uln>'- -c>{ sioffi bbfe riiiiiw e'TO wort ao nei:S/n;>B sno aion 

OP 46 -,fti, tb% J iP^b*^F4^tfre^|^n^T*if«»Ab«^.#pii n .;>?.; J t . ; ! ^^ .auoii 

Other OP'a'tb tonttol^Ita location' ind «6*6mertt c^^ieth*4eiii4inaer J iJ " 

of the artiM ;i s*steih^-Al^tt« y ^^ f,Lu '' w 

the thesis-fey Welsh.* ; ' "^ -■ ; — '^-* rf1 f - s ^.i« Y z £ dw. ^sinsg-^ ci y fe * j?.e« 
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AfcptidtflON or m-tiM coMWtAtit*At tfectoaqpiS 3 

TO fcA&t&i^OB^^ 

r, ■•-.:;. John Brach ...,.::,■-.; 



Introduction 

Th^s ...chapj^r describe 8 an application., of .the OPS sj stem to scheduling 
and control of a project made, up of individual activities. The objective 
was to schedule activities in a way that minimizes over-all project cost 
and thereafter to provide a facility to Monitor project progress and when- 
ever necessary, to reschedule the remainder of the project. 

Six OP's form the basis of the system. These six represent a com- 
promise between flexibility for the user and efficiency in computation. 

Background 

The scheduling algorithm used is based on the critical path method. 
A project is broken down into its individual activities and a network is 
developed using these activities in such a way that the actual relationship 
of one activity to another is depicted. Each activity is supplied with a 
normal time and a crash time and a cost associated with each. The critical 
path analysis generates a series of completion times, each with an asso- 
ciated direct project cost, which is a minimum for the duration. There 
will be one sequence of activities which determines the completion time. 
This sequence or path is called the critical path. The activities on 
paths other than a critical path will have float. 
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Although the fi*^^ ^a^«c«. .#C^*f^^j, ^l>^^«^^^lVifl|f^Jhff^? lty at 
normal time, will have ^ r -^ e ^-^^:f1^^ l ^W^^!Sr^? itvAti ' onB 
which render importance to f^.y < aga^^n^ jr # ^h ^ y| . e a|^ j>1 ^ ( ^at , a deadline may 

exist which is earlier than the first or normal schedule. In this case, 
we would have knowledge of the activities to speed up or "crash" to minimize 
additional direct cost. Second, a conatafensstefem of indirect cost on a 
project usually indicates a total project cost minimum at a project 

duration somewhat less than indicated by the normal schedule. 

/£-. i. j „'ii'"t i '.;r:.! 
All the terms mentioned have strict definitions too lengthy to 

include here.^ A good" reference Is "<>£&Mi^B'oiiWi&?u»i WW Scbfc 

duling»V by J. Lloyd Cirtcl&feV a pufr^Ion 3 l o¥ tn^H)elAr^ntf o^ dfvlt^' nfi 

Engineering, Massachusetts Institute of Technology . 

iq io Jii;:",;i7 yj v.1ili':i£T s oMvoju .,-j -; . > ;■ :, ■. :tcd ': bus 

lj • '■■:& !•"<«■;> v/L: "in I ^ rjJ la -'i.f :-■ -J J > ' ; ■ ■' ' -J'SriC 9<-;A'r"nq 






'".•:5f ( -< 'JQ 



- K.-w 



)... nw 



.jiViurii 



l.v/ •-:..! 



ppp 



mmmmmmmmm 



^'!%#: : : 



4d\U\8 






•*!?/«* 



MSfl 
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Q&i 49L IftiJt JMItHMiL iMHii Manila .JBL «MMNM^. AL #22*> ^Mfe*r fX3ML> .. l 

rWfTypWi wjaT «JJ 'JPWIIM^"^^^ 'JWWF &'Mm^*^^fQlmKw<WTt* *f*4 ftfPf a3a» 

fflT"^MBtWIR J^fYfl9Rl#% VflMHf *4 3«Ufflt «»bo«i iri3 bnR L bns 

?»$w iNBUBMllllMtf^ *d *«s® ?s<(wn x**vs ansa© 

. b9^1upa4#»«ia^<aaiMlMMMtai0 as**»<|»9S> fe»* ft*** 8 *^ fe***4BWir jfaowaao b 89jifi3 
TGI » tltfr firtik €iM 



4 mmm* mmm*w m** mM « m* m * * *** m * ji ■*§!■■> Hi*i*s* ^io«#ia fl 
tt««4 te 0HI. Wm Urn twKtlm * *mm *t*0mktf*im > \*t l *+U" ^ 

erfa ^3i:m*bl #9 luqluo tol 6#v«| **» «*»4aufl ©boa lenlglio arfT 

.?»at; sda o3 89i3ivl3as 
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OP36 



OP36 is a routine to compress the activities as represented in the 
data base. ; 1ftis l is r neces*1^ ^ { in^^ 

ments of the scheduling alfcbr^ntt. '■ the ae^vitW muW ¥e 3 Ijrdlretf 1>y °L " x " '' 
and J and the modes must be nuot&tieid W £• •Btrtc%^%e i ^u1iitka¥Wn%r^ T! :, ¥Kifs ' l ° 
means every number must be present, from one to thfti mwebiMBi jaodet nunfcer 
and every activity must hav*&*/J::v«liw-;;grWfc»;dth|ra OP36 

takes a network numbered loosely and compresses the! ikO&mnamAmta a* required. 

This OP will be; required «»d*rj tntp.5 *dtecus»fcajnee«q first* original 
network input may be loosely numbered to allow for manual revision of the 
network without renumber ia* the M&Ufottetia&fiWpTbilmtimtt&mttiviaiJm* 
may be. added. : The 5 second c^f»;wh*tein Qgafew^ittfcft.:****! JUbf^«Jiiovi»g3*n e :>.>* 
automatic updating of 4t network by Qp^Oi ,,, nr _ - riU ^\ 3eo [ ^n .A^n rri b^vrsa 

The original node numbers are saved for output to identify the 
activities to the user. 
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OP37 
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0?3.7 is the scheduling algorithm. Jt ^>erates on j:he network s jtpred 
in the common data base.. A schedule of project duration* ,and associated 
costs f or, cr-ash, „prograj|& are ; sujHma,ri*:ed agfa pr .j^nted . ^.tap^file ;Ls 
created, cor responding, to each schedule : number and .contains the, .^arliesLt 

event time, of each .node, for the current,, iteration. 

•' •'•.''!"• -•■■■•■• - •,••• i.r .. j R/uy :; -jru .oaves joa s';s? 40 ;-..^- . . ..• : -■;..■• • ■. 

'< '■ ■''■■ i '"■'-• ! '- ■:■•'•' '.- . v>j -.••.■!' •-.:•■;-.' ■ ■; . -., y^.'?ri5 ln'il -.-?, "uqiji: or:,. r; ;hrss^j.. -v-;. 

The scheduling algorithm is based on Fulkerson's solution tp the 

.fiiBig.fcir ."iijy's.-- -3 ■:: ••: .; 

critical path problem. It consists of four sections: the flow computa- 
tion, backflow computation, activity flow updating, and flow summary/ 
output. The logical sequence of program execution proceeds as follows: 

1. The flow computation is entered and a forward pass over the 
network is performed labeling each node. 

2. The backflow computation is entered and a reverse pass over the 
network is performed. When a backflow condition is detected, 
control transfers to (1) to attempt to revise forward flow. 
The algorithm iterates between (1) and (2) until no more 
revision of node labeling is obtained. 

3. Activity flow is updated according to current node labeling. 

4. A summary of flow reaching the end node on each iteration is 
maintained and printed together with the event time of the last 
node. 
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OP38 



For each schedule generated by OP37, there corresponds an array of 
individual activities with their starts, finishes, durations, and floats. 
OP38 accepts a schedule number and outputs the activity array corres- 
ponding to that schedule. To do this, a tape of earliest event times 
produced by OP37 is read and the computation is performed. The quantities 
calculated by this OP are not saved. The original activity node numbers 
are present in the output so that these activities may be related directly 
to the network diagram. 
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OP39 






OP39 Is tall^tf %*ie ~ftft&r¥ade ^i*i^i^* 1 fot fl 'i^l?^ 1 ^ better nantev 
It requests^ Scfieaol^^M^ <1>rlsvkbirtAy fcenerfctyiP Vy <#&¥' aft* 3 a? dayl 
The day specf^B ttfclflPUay 6S wMcttVotP 4»tetf i «WI!tt#P^l^l , WililP'"- '' ' 
In progress. For the schedule specified, QP39 supplies a list of all 
ad&ti&k f*s "fccft&luled^^fe W trbgtfesV : &Hk&b&!$&&<ik i W <fcttt *>y, ' w*tti 
their dtfrat*«h#%i«p*K^ 'fcdifrl^ 3 * h: 

posses^ ^tba^Sna t3fefce*^^e«*ay Wlst**^ t^tfikwP&iieW 1 *!! activity 1 ' can 7 ' >' 
be p&r&X&^'&rt'&f^ -^ 

its ^t*W^«%l%rt' WtiA^ri^tSbBfc^Bfly iftSift? 1 Hia¥ ! irW^amvit^l*-^ ' ' 5 ' : 
behirfffin r%l^io^i^%l«^i<^ri^eC^etfer%fe i ifa, bl tt4 ^jectJ wi^°f>e ; tfeiayed l J 
and T^.Wiii^dOonttmimx&P. 3a ttife Ittberf^ft ^a* &nly<1>e^firi^-; W"<"«"^ 
certain cases, by the completed acti^.ti%s ft) tfft'^^W^thifc 3 iWtetface J 2 
as well as those scheduled at that time. This is because the position 
where th^ i*fc***«e* &&*¥>#■ tfcaitf afttt&feilftcfL rf^lflFI float E of ati : '' 
actiHty mfiel th^°%hW'i£fc^t?*pfted%lfcA lt44t«°anriftire*ore^ 3 n6 Ivj i i; !ii 
activity on that chain would otherwise appear. " :,J ~ )J " "'" r *' 
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OP40 



This.-pperatar perfprua, thp pp$|a£;Ln£ , ; ptf a pjcpjept .napfprjKr.af any 
time during the apfcua,! ^raj^ecjt. ,,,Jf „, <i^ ; ^£e££, -f^fft^% j a i ,s|fc^;prpj^.t, UD ^ 
network repreaentj.i^*he.-j:«|Ba^^er, of, the nrpject .^oj^-fhajt p^st, c , l , 

The fir at infprstation 0£4Q ^qiifj8^4j^^ r ta|)jB 4W^^ r ^PRf^i^ ■£<* I^PP-. 
the updated liet^rkj. Th^ 43*«^ ^#^?P^*P .;, ■ ■ i .;,,■:' 

correspond^ tp a ached^lejjju^put^ tape, , ;3 j^t^, j^^s^&^jLpifc pf ; Jthfr ^jB^pr;*- ^ . 
face currently, ea^l^ x bet pe^^^ , ; 

activitipa. , Five,, pippes- o^fjafpa^g^i^rfboi^j^^ ,, ■■ 

x > the taj-lfodej J;, 2) the head npd*-^;^), ,^i^ n^v e^^i^e^iv^iaa^ ^n» u i- ; 
to complete thp apfiv^ty^ 4) £he ne^pra^h £fcne est^^ed;, r 5) 4&e; plppe, u .... 
i.e., coat/day tp shorten from. Q) j^> t £4) > b^r^r, y ;!.j ;-.■•..■. -. -^ 

With this information^ a^ new„ netjipr^ ^jjd^yeion^^ pr^pglM ailj ^ 

the specified activit^eier f«8p*bPF ^ifhfffl^jtfJ^f^^W^J 4*>&9Qf W*L 

is then written. ....,., . , , v ■.--:.' 
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interface between activities scheduled to be completed and those not 
scheduled to start as yet. OP39 was executed on day 13 and reported that 

activities 6-9 and 7-8 may still be in progress but all those previous 

to lur;/:;--- ant Mjqni :?W :•■ y isi^aui 1 ! ' = j bshui^ni ax mni'ioiq sin ■'<.*■■.?■ A. 
should have been, completed. Assuming the project to be behind on day 13, 

and in need of rescheduling for possible reduced extra coat, QS&Chw&M it ,:,igy riq 

executed to reschedule the remainder of the project. New data for activi- 

:--:;i <;■■?:.-:■!; -■■ •■■.>-,■ il ,' ! X iosfoi'S" fcailB-) sd liiw oarioa Ids 3 '■■■:,[ :-Ti; •>«! 
ties 6-9 and 7-8 were aupplied. QP36 was executed to renumber the new 

project Xoaftier; D»^a»a*i.ti7'inw.v.'lhea^iM^i^;i»i»dMceAaii«a9» j*sjfc^f-:*«h*d#l*aKil 



;■.; : i onx ;-' f .' j9! ; 
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lariaafr aria afli3«so3«A 

An aotgmatbd stock ' ' " ' wrr "" r, : - k™™ -—--"" r ~ mm ~ m - ■ 

aniflffljBigoiq srfa ei agnarfsxs swdf3 gAL3sa»3i;a si iiaA3 aluailtjkb 3eoer arfT 
XlIsi/3qa:uioo al dot *>d3 3° 3iaq f(il^«»rfj<«©d «d8" ,«©i:tem>l staHaiaaqe sd3 5o 
gnida^sffl gniid o3 Bed ^Ino loffT^^»*®3r "fWll*! J>»ipi sdT .^e»s x^viS^aqiHoa 
Jii^ttfl^iiP 11 worf ^bitaab bna saiiq » 3*8 3eum oala ail 3ud «:iarf3agp3 a-sab^o 

f {Mortal aarkata, particularly mm MB a* A few «»rk Stock Badtaaat. 

tk« a*et*M «a i* mw ataada aaai W&*^ Wlm&f » 

brok.r'. offic. a«d . c~d. -rk*t. WAt^n- 

action, ***** tk* «Mt« «M* H m/WS> <**£u 

in *«•<*» t^^m^^yf^iiWjir^ N*w. 3 %a»*r« 

kaa an aeeoant. m *m «r Mil fM^'il IIMtf M aw Mi *U 

.tock., M8 al» dMMtt MMf M W# M)dHi iHFI^M^tt 

par for* thaaa fuaetiaa* **• «^r«lf M'mHmWI 1 ipulMf 

&a<jmeo sai«3Jt3:raq adT .d 

. 83«avs I&n"ra3xS . ^ 

99irfJ 3»tx1 arf3 moil 3nais33ib ^IlauAeaaoeo 93 « *9ldaiiav tuo'i 3a*I aaarfT 

-qaoxs ni 3qsox9 , 3srf3 ad ^«a 31 *$$uitam'~*d3 o3 Ibhi93x9 sis ^arf3 3ad3 nl 

eavlaaaisrfs iio« ttaoaaui'tal 9»ari3 3sl bluoda asllBiasqs ad3 .esaso Xeaai^ 

^isaatilb daM'i an aria aMSi/I3ni Btsd3 3si «ad3 %9tii»'x gnibsiJ Y-^^sb ari3 ai Syo 

-noo Ibi903§ srf3 33sJ53^ biuodz isii&m »ifT .esivx noiaioab sri3 gnlg&ada i(d 

arf3 gnxvad nsrf3 i&ri3£i t a^Do3a isiuaiJiaq ad3 baa ^inonoos ari3 to rtoi3jb 

.oieirrarioam Jajf^sm arf3 ni agnarfo a xd i»o3« »d3 3to aulsv arf3 3oai3£B 3aiiai» 

s.tri gnJWsra ni aaldaj^tav sasris ariJ isblaaoo bluow jailsiasqa bsflsaa-xgo'sq arfT 

Bsoiiq gnislueal ariT .bsisllo j(do3* lo 3m;offls b^ia gnialiq ho anoiaiasb 

.ilniil 93;a6^sIo3 nisitao s nlriiiw Hal y*^ ii *9* ° 3 b^3aa3 ad nsri3 bluow 

b&q\3 agaaasm s avsri Ilitw ■soiaTraqo arf3 ( 8 3iniJ:I SMi3 abls3iJo aia \tarf3 II 

ari3 wollii to llaamld aoiiq srfs gui33aa \[d $Ts3^*3oi isdfsjta nao ad baa ioad 

bluow 3sd3 3nsv3 lairtissxs na ^d ba33*lla al imtiy&m SifS il ,biia38.o3 9»Jt3;q 

albnad 3on bluoo ealuT rroiaioab Iserroa arf3 3*d3 ^^o3e sd3 co aus a aattao 
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Automating the Exchange 

The most difficult task in automating the exchange is the programming 
of the specialist function. The bookkeeping part of the Job is conceptually 
comparatively easy. The specialist^ however^,' not only has to bring matching 
orders together, but he also must set a price and decide how m uch i f ftgB&i $#l 
offer. JIls, decisions, are, based on. the following variables: ,, . 

, ivi.^T^^O^^O^B^^^O^M^^^ ^^ ^^ a . 3j ,^.,^ , )( , T 

3e . The^spe^al^^curr^nl^sUioi^.^ , SJiK|fflo _., ., rf , ^ , ti : ^.^ 
It is also conceivable that the specialist may want to, consider 

- -i ''■• ' ;s '■■"•■' : ' - i*J ■ i.>'r. = :'■.;. J !.:!i'p !Tir i,1o » :; .J :.: ■ J .1 '• iiaa iO ,'i!C>' i < F. • ') , 1 -.n.'fi') _:;-. .11. ?bH 

4. The entire market trend 

5. The, general .position of the. economy 

6. The particular company status 

7. External events. 

These last four variables are conceptually different from the first three 
in that they are external to the market. It may be that, except in excep- 
tional cases, the specialist should let these influences work themselves 
out in the daily trading rather than let them influence the market directly 
by changing the decision rules. The market should reflect the general con- 
dition of the economy and the particular stocks, rather than having the 
market affect the value of the stock by a change in the market mechanism. 
The programmed specialist would consider the, three variables in making his 
decisions on pricing and amount of stock offered. The resulting prices 
would then be tested to see if they fall within a certain tolerance limit. 
If they are outside the limits, the operator will have a message typed 
back and he can either interfere by setting the price himself or allow the 
price to stand. If the market is affected by an external event that would 
cause a run on the stock that the normal decision rules could not handle 
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the operator could intervene by chaaging tb«pa^araet«rs of the decision 
rules themselves In order to insure ■wn*wt&&m1ji-4pBpTOTi-&iM£;:-to spx-is^^ This 
gives the operfattar J the ability 430 affieet i^i virtual tra^aictdoa iprice* -and - 
priee decisions in general. ..-■-. ,-..;,--: 

The computer also must consider the position it haa taken in the mabdket . 
As more and more is invested iia >a /piarticttiarj-satdefc "fcftecpodJat .spread Will 
probably grow wider as the ^specialist is .£ orced fearwitbtdraw iiia« siippGart. 
The emphasis should be on an orderly decline and idhe Qapit*! behind, the; 
specialist should he -enough to ■■ ii.tiavtDmit.hta . >! >lfi the amaaat Invested is 
greater than a limit either the market will battasttoHhes toerapooueily closed 
or some form of human intervention will be ineceaaary. li- r " 

By insuring , %&$$ all decisions are ma^e^according to . standardize^ 
procedures any conflicts of interest will be , minimized. Of course, every 
time the speCj^a list ^nters into tv#4^n|;^ome^co^f|^c^.o r f 1 ^tere^t will 
ensue .but it will be equally i.i&e^v. to ^hap^n^tO/^ny^uAtomer., This i? H ,tjhe 
price that must be paid for a continuous .stable market., the computer will 
not try to make mpqey other than the difference ,in the ..mead* This should 
eliminate the prime conflict^ of interest since r thf computer will not be 
prevented f^om taking. a positiorj when necessary due to self interest. V*e 
amount earned qn tb,e point spread will .probably be enough to qoyer losses 
and costs. If it is not, a commission can be charged on all .transactions 
over and above broker's fees. This system will not allow the use of not- 
held or other discretionary orders, but all other including market, stop- 
loss, limit, and possibly stop- limffc ci 6rders could' beliahaled. 

There are two primary objections to this system voiced by the New York 
Stock Exchange: 

1. Who will bank the specialist? 

2. How can a computer be programmed to meet all contingencies? 
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In answer to the <fic«fc question,* there is no dc^t that this scheme 
will' entail a thorough r eiorganiaafcicm, of <bbe«peoi»litafc function. The^ i 
exchange mil 1- probably have .«» -bank each ^separate .ata*eiielii*e ifae* each ,. : 
separate stock. The operation will be, like the exchange it aelf, a non-i ; 
profit operation. There is no doubt that short run profits and losses 
will be made, but these will be prograaiBe^ so t^ey >eveo out In the long 
run. Funds for the original ^capital investment ne e d pot be scafcsed all ■ :/. 
at once, since the exchange could gradually iconvert the individual markets ■., 
as specialists retire, with a deadline on -eonver>aion of allisiarkafeatlqnfieBrfJ 
tainly the amount needed to back the^imaicfcetiineed :$otnbe -toeulaaeaje palace .,.;? 
the requirement* > for specialist investment are, at :pB«8ent> 'very low . - 

Eventually these requirements would have t»it*e raised iaamorJder to provide ; 
adequate stability. 

The second question is partially answered Oy proVif^ikg^mian inter- 
action with the computer, Ifd^ever, as i^iiii'fat&t&i^ii^k'v^^&bUdti&ii^ 
clear that this feature is J alway i K aetfr ; aiST:e i Sin^e^tfhe'lat^it alioiitld tefUdt 
values, hot affect them/ This : iM ^ihoWri byflie inteWa'e (flsiikl of an^ohis" n 
connected with the exchange for «hy external ''cSaii6V : Mic^^^' 1 iadt1itMt^ JI r ' : 
What they don't realize " 7 is that tfte 1 $peeialfli;^ b^y ! emp losing "h IS know- 
ledge' of the outside world, is affecting 5 t?he m^Htit Eternal fy himself V r " ° 
What I propose to do Is to affect the mar xet'by Cb^sfdlfih*! J out«fid6 J j 

influence, but do it systematicilty and witti 'a minimum of 1 external Influence 
and personal bias." ->ii«w-s 'on a i: .! ,.-:> d.i: 

Note ; The following operators were the first ones programmed, and form r 
only part of the operator set as of August, ,1964. The set is being ex- 

. '■• ■■ •■ -■- ■.-■■• i-Tr-v, . T-.-.vr.- Jim' I -q<> H' yia:ssr-; T>n- t :i."\!.:. , y.-.n, 
panded to include the specialist's function. 



^■e&jj&ft r^&jr^S ,£=5; 
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Description of Operators 



This operators is always the first (^ ; calfe^- i l*^h^ ii *^teM. lt ; is 
necessary to pet tip * J rah*dcW rtfirabe* general :s &> '■^BSW4ay , ^i*^a % to*# l to 

operate in a t'*ndo« roattn^. d If :t tKe ! .u*er ^Stiii «&4i&ve^^ Tf*t W' : •'' 
operators avaiUblei he' dati Kf t -<2a*i*f«g«< 'titttatf *£&# &M cottsiM types ! 

back SUPPRESS I. ■<■■>■■■■• •<- ; ' --'-'« '->^ - «*.•,:.*:■ a : ;3 ;. , ,, ;.;-!,,;■.. 

0P42 " J " '_"" 

This operator seta u$ an rJ (^^v^t i ^f^ ? p^ 1 ^ae^-.^fy^k. sjeparafte Pfi?$;, r 
only ii^ .tJiii ^pMato^^^e j«l»|8 ^.j^^^^vi-Ji^^.igf^pBijffi;. , 
Account number* ar* as^gned^. .and ^ .^-^sax, a l^ajfx <£ & .iftjw* suasion $£ } 
some stocks, he may give them to his broker who will put them in his account. 
He does this by specifying the number of different types of stocks he has, 
then ttfe ya*t iciila* ' sfrdckntiagg* ^^'^^ ^^afl^ i^^iaAey Wi^r&v 
The isftocks Are entered "*€ tftW ^tiftfaft ^marW^r^&s aflV *«onf ? the%" on Arnfeil '> 
th#y are so*d tlfe ic^mpo^er %ee£a* "**M6k o¥ «fte&"W'&tfi&f g¥iti (bir V&dW) .>" 
The user can inquire at any time what his gain (or loss) is by using <&$£. 
Only six accounts can be kept at preset^ K Jbut this will be extended. 

This operator will give the current market price of any of the ten- 
stocks listed. The user merely enters >.$fc^ stock number and the price is 
returned to him* 

,• QP44 .,, ; ...-. >■ 

This operator give* CHe user Che enirreW s^ttls ^o* His^isortfolld ' 
including an inventory *f me hufcfeer ■oi-HWWW e^tfWickfk,' &&•>&&&■"■ 
at which the stock was bought or the market price at the time he entered it 
at the broker's office, the present market value of the stock, the net 
gain (or loss), and the number of shares held, Then his total original 
investment in stocks, his total present worth, and his total net gain is 
printed. 



^■■«:S^4fe^e>^^^^J^^^^!^f^'^ 
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OP45 



This operator enters in market orders to buy certain stocks. In a 
real market, these orders are either filled by the specialist or by his 
book of outstanding sales. When the martftet order is received, the program 
transfers to a^juj^at^xo^tifte, This, ^utin^eter^MNiei i^ha .mar^e^ pfitee 

of the -Bjtqcfe.pM/.MctwtftftcSfe* ^r4«K' ,7?»| »§**§& Bitfrtr 1 ! ^S^ 1 *** 1 {*?JM 
random number ftei»er#ftor,js^id9fe iajgodif ied hXjthe IjoQ^^^u^ft^nd^ng , limit 

orders (*e% QB4£U To* PS*** o£ J ***? 1 ^ iJPH*$& 9 :4* flfje^S 1 "^ &ill£ a ■ 
specialist picked a random price between the highest price of an pr;der and 
the lowest price of a sale on his order book and executed the transaction 

• .* :.! .1 

.i *-> l -J 

at that price. If the price he picks corresponds to a limit order, that 
limit order Waist* executed 1 . * The bpera^oW^fntff & v c&d&toMti:dti of the 
order, the- pwclia^ p^*c^ ji 

the utter' s old account? *bMMacc, am&mt^4^y^omM§idM^ atid ne*# c b%lance/ 

1 OP46 " "~ '"^" _'"" ' . 

This, operator is 4nuc^. 1 l^% r SAfle 1 .aa r <^l^, t(i ex^s$, n i%{^^^,,^ jWWjpfc* , 
sales at the ; market pric*., rT^e pr^cse, s ,is ^ftt«XB|iny^ fclja \ap?a» , way as in .#§44. 
The operator print a the. &*l& pr^^r the proceeds ^jf .^i^^aa;^ sjtf ;jtjhe user's 

new balance. -. kk ;-,-■; >.j; : i , ; ,ij ; ■,• ;;=.■. j fe :r:Lr ] ■■.,.-.<. 

■■■ OP47- ■■■-*--■ --"■'■- ■•■• ■■-•° <""--■ v ■"■'-■■•■■ <:•■ 

This operator is used to obtain prft&s on all ten stocks in the 
market, . , .,-,...., .. ; ,.. . )f ;., ~ v |-^ !';„.•.; ii.v .■?• 

■ur op$ 8 ■■•. >~, ■•■=. I:.--?..; ■■ ■ i ■■/%,.: 

This operator is used to deposit or withdraw money in the user's 
account. If the user attempts to purchase a stock and his balance is 
insufficient, he will ge£ a message hack jtadl^g, hjm, tyi deposit «ore money. 
His transaction will not be conaunnated if hjyt r baJlanc# ia, tpp Iqw. , i ,. 
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0P49 



This operator is used to enter limit and stop-loss orders and sales. 
The uses)«l»t!era.hts3«c«dui»toBn9tf>lte,3the ttitsbets ftiigfce tfcoftk-r&oolwiufeottght 
or sold, the.tMwbeiiOf 'oalum«S3to^aiijtKHa^iaQr^jK>14^ao43tlM(jpt'ic«-'.4bwqevij > ' 
which or below which the transaction should take place. These orders are 
entered into .the specialist's book. As soon as the market price goes 
above or below" the triggering ptici^'M <&deft iU b UHti4a^U "tnd L e^fcffed 
at the triggering price. The book is updated each b tiil a tSe MtWi'^iH &,rJ 
changes. The market price will change every time one of the nine opera- 
tors are used, r so the specialist always keeps his book undated. As soqn 
as a book transaction is, completed the console will type a message 
announcing the sale or order and the price of the transaction, plus other 

information on number of shares, new'TSafJBScfe^' etc. 

( ' ' 

■■'." : ''.":■ ■■ ' ■■'-';.■;: >;'j tu .>lfi.' '-. ro 'filiTO nt. \i U3 Yd ;>>:.'-, ■•.-'a, sjj.s'L' 
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Other Subroutines 

UP 

This subroutine is called by all OP's 42-49 and is used to update 
all the prices of the stocks. A random number generator is used. 

CL 

This is called by update and it drives the clock by an increment of 
time each time it is called. 

CH 

This is called by update after the prices have been established. It 
checks to see if any transactions in the book should be activated. 

OC and SC 

These are called by CH if an order or a sale in the book is to be 
executed because the price has gone past the trigger price. 
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General Comments 

This program is realistic in its method of handling limit orders, but 
not in its handling of market orders. When the market goes above or 
below the triggering price the book transactions are activated as it is 
done at the stock exchange. Market orders, however, are determined at a 
price somewhere in between, or at, the highest book order and the lowest 
book sale price as is conventionally done, but the actual price in between 
these limits is random with a factor added in proportional to the number 
of shares bought or sold in the last period. This of course is purely 
arbitrary but it does give fairly reasonable looking prices. Market order £ 
can be considered as being bought by a specialist at a price that differs 
by a random amount from the last price. If this price happens to be 
above or below a triggering price the book sale that triggers the price 
is consummated at this price, however there is no reason to assume that 
these two transactions were an order and a sale with each other. All 
market orders are actually made with our omnipotent specialist, and when 
he decides the time is ripe he will trigger his book orders. 

Presently, only six accounts are kept and only ten stocks handled. 
Obviously this can be extended. For each user, both his stock inventory 
and his money balance accounts are continuously kept. 
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AM ARfiAY PROCESSOR 
by 

"- : " 'layer tik8ia^ Iyl ^ liD '^ - tA q(; ' ij,iT 

• ."roid^-'i^ai iprnonv Foq s i •:.■/.; .-.-: ./. 
Introducfi&oa,, t , ... 4 ., ^ ; , _ vi;j , <ffr3 ^ , fjl , H9 ,^ .^ ,„ ;: 

- ' J ' : - -' '■ ' o: > ■ a h:,o. ,■/::,'.[ :?»•.' V> os-isjab ari.i unt, < e tilde it.-: •-• .Jnsv-n-j ]jb 

vegops v« s twim^thfrmisfhrmisfi m % ^S^fifE, wh ^ ch . 3 1 „ ^ 

allows the.u.er tc l^f^o^^^i.f^ulMn-B^^^ofl,] 1 ^ 
written within the framework of the OPS-1 system. 

. i/fi j i no fa-.OrT.tiq 

Data is represented^ withW' the cOT$uter< as a^^-fci&ntiirtiai array 
of 50 rows and^column.for &%1&&VtfW B A&llM 4&? 9: iri& °" " uss 
particular conf ^ration" accom^ b9vaIq 

was chosen arbitrarily and can be changed. 

• f.-M^i!n-ivi ift-^nii :.:. ; - j x :* J. jjr ,3 

' •' --: ; -' : ; j J-S vk; .-,3 ,' ; ,-J I0.133V 1EsI^ BSJ I i'j ::-'!': T9 5i: ^r:T 

'■'■> : -' • • •"■' ? " ■/!■''■! <or, -. -Kj'tj :-;.i : l-l9G3 rroi etr -3ig ~>u i-.r:( .;. ji^noirfd i 

. bdVisi q.' i '■ -3 7£, 3 3 v> ".U.! ■;> oW 



^^^^^W^t^^^-'IV^;-^^^^^ -*?■* 
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Description of Operators 

■■'■; <:..:■■ i v ■ <»2& 

This OP has two different; modes of operation. 

A. Simple polynomial regression. 

The user specifies the column indices of the independent! and: 
dependent variables, and the degree of the polynomial to be used. 
Results are" printed out as the equation representing' fcftt^oeB^iitV In 
addition the SlfS deviation, as B a measur e n "br ^"g&oiin§fe» ( ot fit 4 ; is 
printed on line. 

A vector of weights may be specified if the user wants to be 
sure to fjLt certain pp^nt s better than others. The final curve is dis- 
played on, a cathode-ray tube to help the user develop a "feel" for how 
the curve fits the data, where the large deviations occur, etc. 

B. Multiple linear regression. 

The user specifies that vector K is to be regressed on vectors 
I through J. The regression coefficients are printed in equation form. 
No curves are displayed. 
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OP28 



transforms,^, §ny, twft vec*ar# (:r to P j^tis§ ■%&&** J&&&* r^^W^BE*:}* ;■ 
Is of t^.,ftSf»r^ c «iAf^).> i^^.^h^jj,^ j&e^ind^ef, *$« W- c 9|W%p 
A and B are constants specified by *)be .uaer,, f 1* one of seven transfer - 
mat ions, and j and k are the two trs#sl:«aimed vectors- Transformations 
proceed element -by-element, and elements may be ehoeen selectively. 

The seven transformations now available are: 



1. 


Addition 


2. 


Absolute value 


3. 


Square root 


4. 


Multiplication 


5. 


Division 


6. 


Exponent la t ion 


7. 


Logarithm 



0P28 also provides for the automatic entry and use of two standard 
vectors: the vector of all ones, and the vector ot consecutive positive 
integers. 
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OP29, OP30 

OP29 is the principal means of entering and changing information 
in the data array. The user can print the contents of the array (com- 
prehensively or selectively), edit the array by rows, or input data 
directly (with or without echo check to verify correct transmission). 

OP30 provides for storing and retrieving all or part of the vector 
array in a permanent disk file. 



9.23 8/27/64 



OP45 



This operator can be used only with a particular display system at 
M.I.T. The basic philosophy is straightforward, however, and could be 
easily implemented on any digital display device. 

0P45 displays as many points as there are rows in the data array. 
The columns to be treated as x and y are specified, and the OP calculates 
that scaling which will ensure full utilization of the display arrow. 
The points are then displayed. 



^>^#Sj|g8£gfcS^^ -*&&: 
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Example 

As an example of the application of VECOPS, suppose we are inter- 
ested in simu^at^ag |he, Qpe|«t|.on o| a, mfit5Qgol$gan fe traRsg95f^tJL9^ r system. 
To ,. do this ^^^s^j^e^aar^^^^^.^^^^i^fa^^ji^if^rjYfljrfljf of- ,. K 
people at, say, bus stopg, ,. ^ssyjgtaig _ t |ha|,^f b a^i:|v^| f$9ffti4.:&lhPQlf§g9» 
we want to know how the average arrival rate changes during a typical day. 

Our experimental data , .c.ojvs.isj;! qf ; ^ fo ser||s b pJ 6 g^aer^a^^onft n x»f ,,,, 
hourly arrival rates, so we^ha^^two Y^tfocq^^l^gpa^g^: M1 vector -,1^- 
contains the hour of the day, and vector 2 ^pii^^i^th^^umh.fr^q^ - ro ,, , 
arrivals since the last hour. 

We can now use the array processor to select a suitable approxima- 
tion for use in the model. 
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The data are input to the computer in the following form: 



me 


No. A 


rrivals 


6 a.m. 




10 


8 


-—.,_ 15 

40 ~^~ 


9 




30 


10 




33 


11 




25 


12 




20 


13 




15 


14 




18 


15 
16 
17 


^•^ 


22 ^ 
42 


Ifr. 




45 


*¥ 




34 


20 \ '*■ 




28 


21 x -^ 


■■' ■&. : 


22 


22 




~-4Z_,,._ 


23 




8 



V 

\ 



y •- 



i *" 



These data can then be plotted, using an 0P45, to yield a display 
^wtiich looks like the accompanying graph. The appearance of ttw^points 
auggests a 4th degree polynomial fit. TjHJjl fit; iirTRfK rtppT irrl with OP26, 
yielding the equation-*" - "'""" 

r 'y a »- ^:0U75X 4 + .6527X* ffi279l3^+lb?^-^04™~~ ~ ~ 
as the best 4th degree fit. The RMS deviation is 7.1 

Raising the degree of <tge fit to 3 affords little reduction in the 
SMS deviation, further indicating the appropriateness of the 4th degree fit, 
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Gordon G. Everest 

'' ■''■ ''• '- ■'■■■-.,-_'■ . -'\\>i ■•;'•■ 'it'/i l ,t!i, ! 3i'evo"!((;'^ r> i d I : : <j..oq J?: ;; :j,:4 5 ■ t. ■„ ; iw. 

^.-' ■• .-,.■*. t; .; - .-. .v •':■■..:.>'.•■ ■"■■:■.) ■■ i.-'vv s ; ;.oi :3^iri^r.„, hi 'S*jxr' :u; ■'* -'_• ojjo (..■;'..> ■;■ ';•■• :t 
Introduction no ' : ' Jnu ' :: '- :?n. J iu; <:,::; o ;, 

Traditionally, accounting has been a process of successive 
aggregation of data to present more and more summarized reports to 
management, owners and the government. It should not be necessary 
to maintain a relatively frozen, hierarchical structure of reports. 
Ideally, we would like to maintain the identity Of every single business 
and financial transaction of an organisation. The information associ- 
ated with each transaction would include such things as the date, with 
whom the transaction Was performed, what tangible or intangible commodity 
was received and in what quantity, where the transaction was performed, 
for what reason the transaction was performed, and who, in the organi- 
zation, is responsible for the transaction. 

By performing the accounting function within a computer system 
it is possible to achieve more timely extraction of information* The 
input to such a system Would consist of initial levels of resources 
(the Balance Sheet) and a record of the flews of resources through 
time. Interrogation of the data base could take place when information 
as to levels or flows is needed and not necessarily only on a periodic 
basis. Within the 0?S system it is possible to achieve great flexibility 
and open-endedness in the construction of operators to extract information 
from or manipulate data in the data base. With this facility there is 
no end to the way information can be derived as to the flows and levels 
of resources within an organization. 

In searching for a concrete basis from which to build up an 
accounting system within 0PS I decided to use my own personal code of 
accounts* For three years I have been keeping a detailed record of my 
income, expenses, assets, and liabilities and in that period I have 
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developed a very useful system of accounts and reports for my purposes, 
which are essentially the same as for an organization^ In this way I 
am in a better position So evaluate the uses of the resultant reports 
and to suggest possible improvements. I can vividly recognize the need 
for a change or further information, and I can experiment with new ways 
of presenting information. 
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Data Base :i..:'-.^i:,.,: 

Since balance sheet items represent resource levels it ii con- 
venient to score the amount s In a ^one** imeiiii#nal* i 4i»*ay -with '-'an-' attached 
list structure foE storing subsidiary inforttati>#ft, t; ^ n ddfRg b £nii^e 
recognize that some «ccq«nts or reaoarccs de fine lend them 1Mb Ives 66" Being 
categorised according to the same dimensions Si etiher^si ?«i^ K 'e]latt^l'«V 
accounts receivable should be broken dowri by tile name^of t*e~#ebtoi ,0 aBd, 
further* by the date of ■lto'£aemnamati!oii r ^£]fc.t*zit-kkt# aas^t should possess 
such, information as idafce p& purchase* «sda*e«d '<Ii##, ^seimat^d ; ; 'icif ap' 
value, amount of can^a&-«p«Ar* so^iadMiS*©^ 
accumulated depreciation, and the nature of the asset. 

Since income and expense items represent resource flows it is 
appropriate to store these amounts in a multi-dimensional array with 
the dimensions consisting of objects, purpose, cost center, and time. 
The data base specifically consists of the following arrays: 

DT(10) "J Words which may be used for the temporary stor- 

IT(10) J age of both fixed and floating data in C0MM0N 

Storage. 

BS(3»10) Balance Sheet accounts - up to 30 classes. 

PL(3, 10,10) Profit and Loss accounts matrix with 30 object 
classes and 10 purpose classes. 

LS(300,5) An array within which a list structure is set 

up to store data which is subsidiary to, in 
support of, or to further break-down the 
amounts contained in the Balance Sheet items. 
It may also be used to store P and L data 
pertaining to past time periods. 



miMO 



8/27/64 



i n "i x j 'in 



:. cq 



vi''<-U" 



Stfjgidftfyf List -itii tv 

Bach cell within the list structure consists of five integer 

£MhM~i*M.i i *9*f1Ptm'&} ^Ste#»u*»e ^W©"3«Wlls 9dW*aei* but thi&d&^purely 



arbitrary* 



AJ 



Cell: 



IB 


NAME1 


NAME2 


DATA 


POINTER 



ID Contains the Balance Sheet account number which 

is negative for the first cell of a sublist. 

NAME 12 alphabetic characters made up of NAME1 and 

NAME2. This will be the name of a Balance 
Sheet account or of an account in its 
subsidiary list, 

DATA If the cell represents a Balance Sheet account, 

this field will contain the pointer to the 
first eell in the subsidiary list associated 
with this account. If the subsidiary list is 
empty, this field will be set to zero. 

POINTER will point to the next cell within the same 

level list. If this cell is the last one in 
the list, the pointer will be set to zero. 

DATA If the cell is in a subsidiary list, the data 

field will contain the amount (cents * dollars 
x 100) which is to be associated with the NAME. 
If this amount goes to zero after it has been 
updated with a transaction, this cell will be 
taken from the subsidiary list and returned to 
the List of Available Storage (LAVS). 

When the system is initialized all cells should be attached to 

the List of Available Storage, through the use of 0P23. The first cell 

of the list array { LS(l,n) } will always contain pointers to the major 

list as follows; 



LS(l.l) 
LS(1,2) 

LS(1,3) 



pointer to the first cell of the ACCOUNTS LIST. 

pointer to the first cell of the EXEMPT ACCOUNTS LIST, 
(those accounts which don't have a subsidiary list) 

not used at present 
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LS(1,4) pointer to the first cell of the List of Available 
Storage. 

LS(1,5) contains a current count of the number of cells on 
LAVS. 
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The fellawing is a graphical ?T^^»^^^%i!aaJ^mtT^^y^Jj^^ 
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■U-i ... E ., O 



1: 






A§C0HNX$ 
*' :: " ll$T {t} 



;?Ju i ramjcAgaj q< KH^^ 3 ^-*^®^^ ^^ 









>'« -:Jr- !,.u: 



i . v* ', tiiv>;:j t> 



T 



MKTWBTH 



© 



© 






! , 1 




•-pJAft 



iw&mamt 



>, ■".'•' XjLi't 'iffi ATM* 




*?r) 31 



&: 



YABLES 

2__J 







© 



«il8i 



j 

VWLCE:,Q8DS 



55463 










,.,::.oi an'i 



c ir.if/,! 



JMdUKft 

■ Ji.'j.^'t f .iJ!,' ' I 



i; ' .? i "v,. ' i j 



T 



wos J=>*-N Waf >Miric iZwe o 



TIT 



1 

16 fafci LIEBMAN 

1 



1000 










'J 1 ; : r ; J> :„?.;? -^ : . ; j. 



■ ^^m^^fjf^m^r:' 



w*so 



8/27/64 



Subroutines to Opera* e- »ep th» Lt»t », .sairqeig ,-.. si: ^.ivofjV' 

In order to facilitate the use of the list structure a sfctpuatn: 
of 12 subroutines have been written; (1) to search the list to find the 
location of a cell according; is a givejft xax%et~sm^fte$-6tnsmrty — 
LOOKA, LQOKH, LCPREV, LCLASf, LLASTN; ! (2)*WiS>difi the information 
contained ! ia a cell -'- UPDATE, STORE; i (3) ^jphangje the structure of: the 
list by adding or deleting cells - - DKLKTE . flfrnf.KL, I BEGSUB ; Juid £4) 
to get cells frqm---©T-piit-cellsrTnrrth^ SLAVS -- GETCEL^PUTCEL . \ 

In the calling sequence «<f -e4eh- subroutine are the fdlrlowing\ 
dummy variables: (Those which are assigned a value by the subroutine 



: *r* underlined -- t*ey(f ^^en|tbujtp!f^rirtai> 



ftini&l 



\ 



N 



IJ 
NAME1 



Indicates the major list to be dealt with according 
to the order in the first cell of the list array, 
(e.g. ACCOUNTS LIST: H - 1 ■) 



The current account number* 

* The • oufriuBmamtoi* - at*** j ~ 



■* '.UliiVJI' .'..!- 



,"i i 



DATA 

A 

I0C 

L0CP 

L0CL 

L0CB 



The current balance in the data Held of the addressed 



cell. 



\ 



The amount to be added to the data field. 

The- location of the cell being currently referenced. 

The location of the previous cell which points to L0C.\ 

The location of the last cell of a list* » 

The location of *: (headerX «elt >£» tji* AC008WS jLMT ' 
which poinrr-to~ttre"~fir st~c*tirncrf-*--strt*#id±ary- list . 



The functioning of each of the list processing subroutines is described 
as follows. Except for DELETE which calls PUTCEL, and PUTCEL, which calls 
STORE* the subroutines are independent of each other. 



LOOKA (N, IJ, L0C) 

To search the major list designated by N for a cell which has an 
account number equal to IJ. If the search is successful, L0C will 
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be set equal to the location (n/.t&i $t$M$vof t EHMcQV&e9potid%agn41 ^ 
cells. If th« $ caeca i« ttn*ucee*sf»i, it etft«8iw»tdi,3ae<3«mn(l number 
IJ doesn't iKSist in the aa.jflr ;li#t Nv BglCi^ill Ofce" set to xend. 

LOGO ( L0CH, NAME1, NAME2, ]£C ) .ia^^-M .u'.Vw 

To search the subsidiary list of L0CH for a cell which has a NAME 
equal to the name represented by NAME1 and[ MMB2,<HD«Xf jOfjK sjeaixaiiayj 
success-fi*!,! K(Ci*rtJbka>ejlaiete ieqwfefc :ato; ti^HkM&itedboifertof attee JOJonxiesponding 
, ce,H« Jlf .j&ie .setjoch Ja& uaeiwcwfcdHal>i in fl±l«wr, wids^siwjijeeirli; 
within the iwbeiddscy liist-**B*flabaetf jfche. aaaef JiA*ffia-«iA*«2*> I4*C will 
be «|ejt feo^ 8sej30. 4 •<-,. ,■>.: :•.---:.; f- -•■ VgJ "IJ .3axl. vsuxlizdui- 

■-...:..;- ■ ■ ■•■■■-.. ..-• - ! ..: -,; •=::-.•' or = - .x ■■■ '■;;=! 3 : ;I ,-;..■-..:. jJ fl.rw 
LCPREV C14G+X. Idfifr > : ..» ,fu^-.. ,n;; : ■. ■.-^gu -..-■^ M . } : „v 

; To find! the. l«cafcio» o^&igaaeWMteifch pointest ati» ii#C.^ *vpryB*ell 
^ha# i>ne and only on* fcieil jg^tofc^aa^aajscit^ if xth&isfaBrGhr'isIJBuccessful 
10& will *JoffiB*ini Ida* 4^«tJ.oai«&J^*<^xlHhft*\nR>JB«M T o<-7 I£j*nel Search 

UCLAST ( N t I^CIi ) 

I0CL will be set equal to the location of th# Aa«£)«£l):>eift thJti^CMA 
. ;,»aj#r lis*;fie»ig|»^eA'byjM.oMN^«oitW»fffl^r i *ie if '.if *hte«pie'cified 

BWJor lis* i**iip*5r).< :;.';."- :.'F :•... : ^ " ?. : JO&T , kl <<'< i-, :hvn S >;; J .'j 

To find the location of the last cell of the subsidiary list of IJ, 
and assign it to L0CL* L0CL will be set to zer$ lS&fh£)fc*bfcJ*3ai9fi 
list ©i amount U is enp£y f fl j if utceyjw&t Mi a»g«k not apgatfroln 
ifehe j»Si©K liafc N. , ,,ur , JQJ ;• -- ; -i j.^j:> orb "t-..;; o:> bi>: iiOtyl 

UPDATE ( I4JC, Ai DATA ) 

To add the amount A to the DATA field of the cell who$eD|dc#t,iaaT30 
is MK?.« frSMSA. mill etonfeaia I the .ia«rta»chmioinotQ«ud4tarifield.oT 

■■'.'■ f^^O'- .: • : .:,:'..' . > ■- j :-■<- ■:*.■■,. ■ ■ ,■ ;■-,<.. ■icjqc ■■•>j^3 <j.';J;q>j ;~>ni-: -.jjtfi ioJ.-i 
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ST0RE (I4k}» ID, «AMB1, NAME2, DATA) > i 

To store information is the first' ^fields of the cell whose 
location is LffC* M m *>'-l*ler :M4Ml-*«3-aU 6«iHAMI 2 w^lV^or 
DATA ■ -»001, then the corresponding field in the addressed cell 
will be left untouched. ( .^'-; -'-"'* A'' '■'d? : Ah r :o'-J • ■ .o;.";j 

DELETE .■>$. L0C, L0CB^ ISW ) i 3; ^ -..w. 

To delete the cell whose address isi^islOcfdby^heV -list ' Wfuowtre 
and update tho appropriate p©4afc«*JaB* eell L0«. Si tt iis possible 
to at±iMDpt to delete a celt r^presen&i^ «M iac«ount which hias a 
subsidiary list. If ISW - then no test for thi# condition 
will be made. If ISW ■ 1 and the condition exists then this subroutine 
will ask the user via the console whether or( #^iiewao^ t^ 7 ; :jT 
i carry out, J&e deletion. • -'liSi'&iM ^deletion IspJtfr&ai carried out then 
all the ceils in the subsidiary List -**tl *» returned to <the LAVS. 
If. not, l no aicttcm^^dili^be-jtaWBirfsoJt^tfcie «fcllr:lsjD"is fche>; ffr%t of 
a subsidiary list, then the mtoussi^'wil:^ bee aO««dro«he first 
field of the next cell. 

■ l-^'i •'•■ ' "■■'--■^■^ 

ADDCEL ( L0C, L0CL» H ) J ' i j - 

To add a cell whose location is L0C -to the ewt of Che major list 
designated by N. L0CL is the location of tbeM'tast cell/ in the 
major list. If L0CL - 1, then this subroutine will serve to start 
a major list* Also, to add a cell to a non-e%p£jjj^uhUdiiry list. 

BEGSUB < L0C, L0CH ) .;a> : ,J7^d o. A. .mI-.--.. 

To begin a subsidiary list for the account t represented by the cell 
LOlCH and to set the first field of L0C equal to the negative -of 
the corresponding account number. 

GETCBL < LtfC ) ... !; •■>-. A uv.-:m. .,.- 

To get the location of the first cell in Che List of Avaikft>le 
Storage and update the appropriate pointers. The LAVS COUNT is 

;-■'" '--'■ )fi : \ ■-.....' 
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decremented by one and then tested for zero. If the COUNT is 
found to be zero then the message 'LIST OF AVAILABLE STORAGE IS 
EMPTY' is typed on the console. This message may occur if the 
LAVS is not initialized prior to its use. 

PUTCEL ( L0C ) 

To add the cell whose location is L0C to the LAVS and increment 
the LAVS COUNT by one. Then the first 4 fields of the cell are 
set to zero, 
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Income and -ftcpenae Account Classification 

Income and expense accounts are normally classified only on 
one dimension and frequent attempts to incorporate further break-downs 
are evident in many existing account infc iflMEefcii ^fn b i*ttifeg u£fa>> system 
here I have attempted to classify - income jandkjxpens^ , If ems,, en, the A basis 
of four dimensions — object* purpose, cost center and time. The 
classification on any one dimension must consist of a set of mutually 
exclusive and collectively exhaustive elements (or as nearly : - ! »e is « 
possible). --. - ,,'v ■ :,;i ;;■..,.■.; ■-,',;>/ i {■■■-,■■> u.in il, : . 

Generally* we would like to get information as to what has 

-;•■<= i - ■ ■ ■ .. : :. -. . f -" ■■ - . i .• .'.'i 1 u?ii'i , ~no v" r 'K'f'V 3VAJ •... 
happened so far this month, a comparison of data collected in past 

months, cumulative figures for the period from the first^ef the 5 

fiscal year to the present, and compariSoms >tk£weetfr b&dget and actual, 

and also a framework within which the budgets for future time periods can 

prepared . 

There is one problem which sometimes arises — how to handle 
transactions which affect the Income Statements of past periods* If 
we get one that affects future time periods then no problem arises 
because the item is merely held on the Balance Sheet as a prepaid expense 
or income received in advance until such time as the affected time 
period is arrived at. In the present system this entry affecting a 
past period becomes easy to deal with. Since all past records are 
retained in secondary storage (on simulated tape files) the affected 
file can be read into memoryi updated and then saved again. This would 
also require that the Balance Sheet data for all periods from then until 
now be all correspondingly updated. Although this could be done automatic- 
ally, it is not done within the present system. A similar problem to 
this one is what to do with items which are large and non-recurring? 
It is undesirable to put them into the regular classification since 
they would tend to distort the true picture. This problem has also 
not been dealt with In the present systenu 

On the Object dimension the main question to be asked in setting 
up the code of accounts is: What commodity or service is received or 
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given in the transaction? In traditional accounting codes this dimension 
probably has the gifatis* influence. *M#i*i#,'4MiVttftaoJiefi>*Mle*ai ' 
division made on^hVfeasls of purp^s*iehro«gn-eH« definition «f two or 
more'object 'classes. By clearly defining a system of dassif ieation 
on the basis of two dimensions instead of just one it is possible to 
arrive at a concise set of codes that can lead to more meaningful reports. 

On the Purpose dimension we can ask such questions as: Why or for 
what purpose is the money spent? or What do we hope to accomplish? This, 
I suggest, is the most difficult of the dimensions to classify. 

On the third dimension we divide up the income and expenses 
according to a Cost or Profit Center by asking Who is responsible? or 
who should be charged? or perhaps Where or what should be charged? 
This is probably the easiest dimension on which to break transactions 
down into classes which are mutually exclusive and collectively exhaustive. 
It can be done on the basis of geographical location, departments, pro- 
ducts, persons in charge, or functions (the later may overlap with 
purpose).. 

The last dimension is that of Time — to include the transaction 
in the time period in which the benefit was derived. This is not always 
a clear cut decision but it is one that must be made. As suggested 
earlier, this is probably the first dimension that will break-down 
with the use of time-sharing systems. We would then ask: Is there 
another way to represent the dynamic, continuous nature of income and 
expenditures? On this dimension information would be- stored in an 
expenentional manner. In other words, as we move back in time, the 
level of aggregation across this dimension would increase. 

Within the present system I have eliminated the Cost Center 
dimension since it is the easiest to define and also, in the light of my 
personal income and expenses I am the only one responsible and, hence, 
the only cost center. The object and purpose dimensions are included 
in the array which is defined within the system. The time dimension 
is achieved by storing information relating to other time periods in 
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a file kept in secondary storage. This does not impose any great 
restrictions since generally, only one time^period will be dealt with 
at any one time. 
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Operation of the System 
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WOJS 



.J&*L_&tP UMLJJLJMWt&mteilg&fa as follows: 
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Note that execution of the K0P ..medt-be.. started on line 01 in order 
to set up the index in<2S£x for j^ f f ransf er^tp p e rat o r a g f j:i3--a nd 14) . , — 

A more flexible Mc\k^-itl^ 1 &l& ii frfwB*& within the K0P list 
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FLOW CHART - the system centered around 0P22. 
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#P25 prints «w»r »} lines Of th*K#Tj, 1PR, «*d;£tPft Lists starting at 

liaa'SS*-^ If-SSil^iSiA^ (Sh&s Jjs 

a duplication of OMPl© which I writs *»ti"faa«e *ofc waei ): I ."$ -e; > .-. _• j-n^e 



Thi«^P is twedr to delete acco«iit ftfn€r*t4>tfca»1i£»± <arrayi>*< both; 
the call taptfeaen^nfcM^^oottnt flfed=all!4he.««UaPBMiWiigcxipi4tsalaul»* 
sidtary liat. is*ll deleted- cells- ;are>Ee^i^&*3BTOt&e3£AVftt oA warning! 
i* #Ss*ed if an attempt is fc«d* to delwt* an .ateo*at$a^]p*MclpJinifal 

subliat^aiid^h^ufiat^l^ -hi.? j 

'■ •■ ■ Thi.fi 0P ie used to writ*; a ; f it» ««nsl«t laag asfs t*iu«a«xantf -afcafep* J of 
the Balance Sheet (BS) Accounts, or the Income and Expense (PI»> Accounts, 
or the Subsidiary Lists %IMW>^aWt*iimwt3m&*ulmMlMirmj&mllto supply 
tape number* far tb« file* and is expiete*>*» fca±ph<i<* «** raewtdriadball 
thelnumfce** %ae*isJTklfi bookkeeping f enct ion ie ©n« tt»t*h«Bld eventually 
b* delegated to thaiaya*emV> ■ - v := -uis II Jitu-.-.-.jk r.Jny sul 

0*32 is used *o raad laaa fil* piiAAo^ilyicr^f^adoaybsaf^^iTh*. . 
ua*r is asked t* auppiy the tap* mmber 4a ha uefcdii t- .n-.W^ ^-ii a a 

mi 

This 0P closes out all the Ibcofte and Expense Accounts to Account 

39, Neti Worth. ■.■■..'■>:(.' r>? rijhv. Us Hio^JM 4^ il;!T 

. Ci :', --O- ^:v:.;AO ';VA,T ',riJ ■■• }4:,. 

tfPAO 
0P4O is used to print out the current balance of account UK . For 
Belahca Sheet Accounts the** may be omitted' sine* theyaU qottiiwt of 
only two digits. F»r Income and Expena* accatuies^ifiKo-ee <drslankj, 
the total balance over all purposes will be printed. This 0P will 



■^f^i^gmmwrj^m 



*-• ■ ■ 



«0i*4 



8/27/64 



repeatedly ask for an account number until a carriage retM&Lil 21} 



~r,Sf 



given.- 






;srij i)i 



eiJ 



if i.f'j.j.'"'W ..ft,'i as 



toi;.«j..u 



n #m ! will" p*«tt' eu* - « Trial BaUttc* »f aMf'Ule&al^eonts* -> '-the*' 
«fre¥ is a-«*e<* to £ris]»i»^%ft«Pdt«% tfM^pctfct** »ft thei stateiBeftt. This 

so 6 tm# f '«ee ; u*ei fceeff 5 <&&&&&& &afc'&mAf i o#»m^i tiwofciaa tfcUfci *fo*tJMed 



'.1'.E2.-,'jC 



:io9Tq Ui.i3 o:* noi~n:i ''y.o ru-.- V :>!.)?. 



- - J -m* B 0r-wHi "p*li* & *fctH&^ is 

Mtfc4a v *»° iftp^y"9feLMt*¥*tf§s%i *U£>«% WlMl " 1 IK*f fcl ^*»fe»e^i*ife**er.ed , 

<*P43 

0P43 will print out the subsidiary lists of a series of Balance 
Sheet Accounts, if they have subsidiary lists (up to ten accounts). 



,ifu0..i JB 



0P44 
This 0P will print the Balance Sheet . It will net out the balance of 
all Income and Expense accounts to arrive at a figure for Met Income. This 
amount is then included in the Balance Sheet if it is non-zero. 



-^^^m^i^g^^^^^isii^^mijiSii^i^m^^^ 
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For the Future .. y ~\ . > .:> r, ,;,.:,; ...; ; .^ -m.-,- ai, -1 ^;; y:;^.-;y.,-.--- 

A very useful addition to the accounting system would be the r 

facility to set up, modify, and analyze budgets. Any of the operations 
defined so far which use actual da£ao$ ould be used equally as well with 
budge$ridata, ;, *%#©;,% budget U n^^[i : Px90»lii i §im%¥^PiU^f^i^ n lt8 
current status, juaf as iil#s x ff da$a #r#j,c|r#ft*dif»s*t| opne^jBajofi change 
would haver to betmi^ytab&Uowj jfe£fj«PMri«0Po/i# h*li««o^#**..'fOi#ff»»*A d « ta: 
two i complete sets of j acco^i*, baLance* in., *»*,»«*<? ry,<*f fhj^ c^KPUf #^ at, 
the sa»e ti«#. Tb4.fr fW»t»ldi r«tuAjR9c an.-r.ex*§j*# i$P Afi t&JbCajpsii^dafcft baj e. 
With such an extension te the present system it would be possible to 
compare the two sets of data, be it. budget versus actual or one month 

vessufr anotb#* m u #»di iaajfcBq jf*pe** «^lMbft|k%4Mlif «4MMq *># £ ¥#«9Sj*£ £*««* • * 
,: ,AB#tbfr u p©ff4^141$yiifori;*h# Itftjpr^^a^ift^f^n^plcfffcaivftb^ff 
and payables to include suf|£eip*$ 49*nm't4*9q**i*ll&h9*o t 9n9a»itb€ m » 
prepare billings, and check on the credit ratings or limits on certain 
accounts. • y^t. 



5 cs ij;- -■-■-«(; 



« f>^ 
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DYNAMIC STORAGE ALLOCATION o£ii 

IQMi-.. -.a ■■■•... :■ , — by^. I -.-i'iO art? n.: I'lOlAJ 32i> ol 

• ■" -Ftattcisr^m^^m^^ v - nA> • itcjad soaAaa 

■:„•>; -.-. '■.:■■ :•' >■■■ • :■ - . .;,I?i.\>,j dob ^OuA3H naswjsd rri bstbsei 

PI ■■■■ ■- ;i-: . .i, '..'•-:..., •■:. ; i TB-.v bxdilOriSb SB ra93B : <3 1-840 9f!j 

<.'->s<. ■ -., "WfcuNa3l:lw^3S*y AM«^ o«|di«i0#h0rJjaSdL«d: f«tob ?,i WCUAD mrfv 

'No.rooji!' 'Hh*t da you mean,* said Alice. 
'therWple&yV&oC ^do^mr^ T^omsm o.nx 3i 

', i-.. :■!•:•■ ;.( :;■,.- : ■ ■;-..■'-■ ,r?€~xgoTq 9ii3 o3 jJoad asaseq IcafJao.s 

•■.■■■. :">..- .■--- .- T.f.; :.-: ■■■■>xd .isnamn ?Ai\3 ni aaimiSjrcos isai; 

lattUroducti-piji :* ;- ■; ■ ■ : . -,. -i^oo' worm £3242iL-S. OJ1 iiVfc,r < ^^w sii 

' : Dy'nakc ' sfc&tagS'fcllo'eattofi 5 refer* W t^irtoss 1 by^ fcnicF part 5 !* of 

' programme putlnto^n^ry o^i^g r fcW eU&toi. or" o^r 1 par% s S o* 1 ^ 

program 1 :" it ; atat&rin contraWt^tte tfc^WlldSi^li^od^^ tivitt 

all of the necessary programs and subr^^eaHif mem&y WftfiP sorting 

..4a)«cuSixn..^;'ay- i w•K^pr^^ild*8l*)JMahMl *£j«»i^«^f3d^rfy«»naao v at^rage 
allocation urader. tkfei©PS-l; ay*t«n.*- niam «jn'3 3o sn/nsol sriT ,fa93saJ3 

Dyt^lc storag^aitf^ 
£6 meet space^reMriciio^s , to iner^^nniW^T^ t^cMHftTOosts. 
;! TV6 FAtptogiafts/'CALC^i aWc^Lt^; wt^ 3 %ri%t^ i to b %pirc < e fciliLcfr'Sftd 

''soiWV'aytoki^^r^^^^ 3fL - biW ' b94 » w ? ! ' 

--. = .- .;. ■-■ > <■» 's t •'&.*; :.9iiW . (1;^ jv I ;:.■ j<- : i:s.-- ; aotss 5ni.ris-:i--d3By ) XXXXX. moi 



*RW..) agittil^rq cWJc»**ioiteiOf *M*)/H«rkU J*«£ «RiA»pj*M'^Mb[ hafchs&or • s 
thesis by, Francis. D. Tuggle, "A Programmed Method of Dynamic Storage 

Aiiotafiotf for^t ^mt\i^d y m^mr^ii.m,v < m s ^, W E ^ n£ 

£eho|>l rtufam8m*m&*a\ ^zi&x^x jx-xu? airf 5o .IIe sielsb er.) oyiil bIu.ow an 



•cfaqpgirws, -aS»-«**»»-w-"< >**■ ■»«%KWBs !i r , *?»* - -=-■-■ '■«---. -""• T " t S».^;!. - ^v^"*-*^"^'''-'^-;. 
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Use ■- - " r Jii,Tc, -.^"-/.v "•(; 

To use CAL0P1 in the OPS-1 system, one merely types in LOADGO MAINOP 
READOP CAL0P1. (Any special subroutines: used by the OP's should be 
loaded in between READOP and CAL0P1.) From here on, one proceeds to use 
the OPS-1 system as described earlier. Unbeknownst to the user, here is 
what CAL0P1 is doing: '>-■?■ &ajOW%et&tl!M>Tm*>kk '0*? ttetf i declared OP and loads 
it into memory; th^c^mp^H, : tj^' : ou^E|^rij^^ |q (P|^V transfers to 
the OP it has just loaded in. After the OP is through executing, it is 
deleted f rom, memory [§ Ithovth phe^user is given no indication of this), and 
control passes back to the program that originally called CALLOP. The 
user continues in this manner. Except for the computer typing out EXECUTION, 
he would have no a priori knowledge .that all the OP subpr ogram * hadJapt 
been t pr ey £pus ly loaded., fn|o , njemory^ , f ^pu^ h^ { a^va f |£her - CA|$|>1 or 

hip f ilas)^ an err or ? message is printed., ou| 3 and conlrol, ^jusf pas|es back 
to the, program thf^caUed CA|^P ? ^ . _. J ,, SlM . i , :; ,.,,,.,,,,,. «,--j : - : .<.., 

GAL0P2 is similar in nature to GidLOPl totr Ivi J«a<r a bit awrauaapiiis- 
ticated. The loading of the main program* ia-aimils&.-r'-'lieweamrV t&e* •■ 
computer then types, EXECUTION three |laje^ ; »&lcj»„ i^^atesfh|^ jfwo 
program*. **ye b^en^ ^oadj|d ?n |;^T4^FA^ and REAp|jF9R|EAK) ?q whfch m are 

is used to read the parameters H |r©m *$faS8VWtyh^ c h&t^ d u'l!! m *9fa£ hm 
form .XXXXX (each- -trailing zeros can be deleted). When that fraction 
(indicated by the initial parameter) of memory iianr~lrera™used -up by—the 
uaer^ip pte«ip«ki^q«AlJttP£ %0.1l awnoutiee '*hate>*a**3feyf> printings CHBCK TIME 
anct^amo^ <& memory the (Uwr^^^a^d |||}pc^ i^of^^Mfi * f 
he would like to delete all of his subprograms (nottt^itttiWrtfiute .Q. in 
place of ?). If he does, he should type in at least three characters 



£d\«\8 



%mm 






■*■•"' 
























^j$~*&<§*-r&~i<*1*^»^^?^. 
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« Added Note (by Malcolm M. tftttfetf^ 3i ;{TCK YK'.J 10 3£ue 10 2i7 as ri^w?.) 

;vc-:; .-;;' i.;. J._,:iiu j y\ agRi :; : •: , a :j5i/{. 10 OH as fepz) & '&'} 3 ojyxsri'3 33inj nsiiJ 

It has not been possible to adapt CAL0P2 to the OPS system because of 

some undetected errors, perhaps in the BBS leader. 

, r **«J*f- 8i ;£K$*P ^de^^ea^s. A ^ah^ <^«^^ ;$^ 8 C <^*S& the 

to the disk to find it. This use of the MOVIE) table has been incorporated 
into a new, simpler, and smaller CALLOP, which has worked well. By 

^f^rth'er^enlt^ tni 03 use° oTfche te&jf ti&f?Ub&ft^%£t&V£ 



conslderably simplified and a list which it keeps of current OP*s in 



memory could be eliminated. 
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